Select Code to Download

use Getopt::Long;
my %OPT;
...
...

say "Got some data:\n", Data::Dump::pp(\%my_data) if $OPT{DEBUG};