Select Code to Download

#! perl -w
use HTML::TokeParser::Simple;
...

use Data::Dumper;
print Dumper \%hash;