Select Code to Download

#!/usr/bin/perl
use strict;
...
    return ($dref, $cref);
    }
}

print Dumper \@_;

...
            'z' => 26
          }
        ];