PerlでHTMLをエスケープ

perl -MHTML::Entities -p -e 'encode_entities($_);' file

Syntaxhighlighter

Syntaxhighlighterを使ってみる。

GoogleのPrettyPrintよりもよさそうだ。

こんな感じ

sub text2hello {
   my $arg = (@_);
  print $arg;
}