my $name = String::Colored->new('Jon', 'red'); # improvised module name # Overloads stringification print $name; # Overloads string comparison operators my $res = $name eq 'Jon'; $name->stripcolor;