Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re^3: Ter::ANSIColor is awesome, but.. (need help)

by mascip (Pilgrim)
on Mar 30, 2014 at 14:13 UTC ( #1080292=note: print w/replies, xml ) Need Help??

in reply to Re^2: Ter::ANSIColor is awesome, but.. (need help)
in thread Term::ANSIColor is awesome, but.. (need help)

The starting point of my reasoning is:

There is only one place where I declare the variables that I want to colorize. If I could colorize them then and nowhere else, that would be much simpler.

  • Comment on Re^3: Ter::ANSIColor is awesome, but.. (need help)

Replies are listed 'Best First'.
Re^4: Ter::ANSIColor is awesome, but.. (need help)
by Corion (Pope) on Mar 30, 2014 at 14:15 UTC

    You will need to split up the two uses of $name, for internal program logic and for display.

      But this means passing around both variables everywhere, which is a pain.

      Oh! I just realized, I could I not notice? eq() is an operator, I can overload it! Time to Git clone and see if that works...

        I cannot overload eq() because Term::ANSIColor doesn't return an object. Ouch. Are there any alternative implementations out there that return an object?

        It could look like this:

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

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1080292]
NodeReaper selects a flavor of Kool-Aid

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (3)
As of 2018-04-19 23:34 GMT
Find Nodes?
    Voting Booth?