http://www.perlmonks.org?node_id=599847


in reply to Re: Shooting at a Moving Target
in thread Shooting at a Moving Target

my $char_for = $codepoint_table{ 'a' }; s{ \x1B ([abcs]) | (.) }{ $1 ? do { $char_for = $codepoint_table{ $1 }; '' } : $char_for->{ +$2 } }ge;

Makeshifts last the longest.

Replies are listed 'Best First'.
Re^3: Shooting at a Moving Target
by belg4mit (Prior) on Feb 14, 2007 at 03:04 UTC
    But where's the evil?! (You also didn't use the "requested" (?{). TIMTOWTDI

    --
    In Bob We Trust, All Others Bring Data.