Select Code to Download

perl -MAnyDBM_File -le"print for @AnyDBM_File::ISA"

use Data::Dumper;
$Data::Dumper::Indent=1;
$Data::Dumper::Useqq=1;
die Dumper( \%DATABASE );