Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re: Perl Code Colorizer

by damian1301 (Curate)
on Jul 31, 2001 at 19:10 UTC ( [id://101179] : note . print w/replies, xml ) Need Help??

in reply to Perl Code Colorizer

Don't reinvent the wheel! :) We already have Syntax::Highlight::Perl to do that for you, written by our own bbfu.

$_.=($=+(6<<1));print(chr(my$a=$_));$^H=$_+$_;$_=$^H; print chr($_-39); # Easy but its ok.