Help for this page
#!/usr/bin/perl -w use strict; ... close(H); 1;
#!/usr/bin/perl -w use strict; ... eval($stuff); print $foobie; 1;