User Tools

Site Tools


perl:ansi_color

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision
Previous revision
ansi_color [2009/07/23 08:10] tkbletscperl:ansi_color [2009/09/04 09:20] (current) tkbletsc
Line 30: Line 30:
  );  );
  my $r = join(';',map {$colors{$_}} split(/\W+/,$c));  my $r = join(';',map {$colors{$_}} split(/\W+/,$c));
- return $r ? "\e[${r}m" : '';+ return length($r? "\e[${r}m" : '';
 } }
 </code> </code>
perl/ansi_color.txt · Last modified: 2009/09/04 09:20 by tkbletsc

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki