Help for this page

Select Code to Download

Select or download this

$ perl -d trans.pl 
Default die handler restored.

...
  DB<2> c
main::(trans.pl:4):    my $text = join('',<DICT>);
  DB<2>