Why not adopt me?
This distribution is up for adoption!
If you're interested then please contact the PAUSE module admins via
email.
NAME
IRC::Toolkit::Colors - IRC color code utilities
SYNOPSIS
my $str = color('red', "red text") ." other text";
if (has_color($str)) {
# ...
}
my $stripped = strip_color($str);
DESCRIPTION
IRC utilities for adding color/formatting codes to a string.
color
my $code = color('red');
my $str = color('bold') . "bold text" . color() . "normal text";
my $str = color('bold', "bold text");
Add mIRC formatting/color codes to a string.
Valid formatting codes are:
normal
bold
underline
reverse
italic
Valid color codes are:
white
black
blue
light_blue
cyan
green
light_green
red
brown
purple
orange
yellow
teal
pink
gray
light_gray
has_color
Returns true if the given string contains color or formatting codes.
strip_color
Strips all color and formatting codes from the string.
AUTHOR
Jon Portnoy <avenj@cobaltirc.org>
Much of this code is primarily derived from IRC::Utils, authored by HINRIK & BINGOS.
Licensed under the same terms as Perl.