Re: Code on web in color!

Congradulations! You reinvented Perl::Tidy. :)

use strict;
use warnings;
use Perl::Tidy;
use CGI qw(:standard);

open FH, '<', '/path/to/perlfile.pl' or die $!;
my $content = do {local $/;<FH>};
my $html;

perltidy(
   source      => \$content,
   destination => \$html,
   argv        => '-html -npod -css=/path/to/perltidy.css',
   errorfile   => '/dev/null',
);

print header,
   start_html(
      -title => 'Colorized Perl',
      -style => { src => '/URL/to/perltidy.css' },
   ),
   $html,
   end_html,
;
[download]

Here is my perltidy.css file should you want to use it.

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

Comment on Re: Code on web in color! Download Code

Replies are listed 'Best First'.
Re: Re: Code on web in color! by mushu (Initiate) on Mar 02, 2004 at 02:07 UTC
Oh well...I thought it was cool anyway...thanks for pointing that out. At least my code doesn't need the overhead of a library. :)	[reply]
3Re: Code on web in color! by jeffa (Bishop) on Mar 02, 2004 at 19:19 UTC
I would rather rely on the overhead of that library than your regular expressions. :) Do yourself a favor and read A Guide to Installing Modules. jeffa L-LL-L--L-LL-L--L-LL-L-- -R--R-RR-R--R-RR-R--R-RR B--B--B--B--B--B--B--B-- H---H---H---H---H---H--- (the triplet paradiddle with high-hat)	[reply]