Help for this page

Select Code to Download


  1. or download this
    use Data::Dumper;
    
    ...
        $db->{key} = {};
        print "Dump: ", Dumper($db);
    }
    
  2. or download this
    use strict;
    use warnings;
    ...
        print "\nDeleting $db_file\n";
        unlink( $db_file ) or warn $!;      # succeeds
    }