Select Code to Download

#!/usr/bin/perl
use strict;
...

print Dumper(%extracted_nums);
print Dumper(@shuffled_nums);