Select Code to Download

foreach (keys %info) {
    print "\t$info{$_}->[0]\t$info{$_}->[1]\t$info{$_}->[2]\t$info{$_}
+->[3]\n";
}