Select Code to Download

#!/usr/bin/perl

...
702005010681238,5016681238,7020000044052
702005010551103,5016551103,7020000023F12
702005010625010,5016625010,7020000023F51

$VAR1 = {
          '7020000023F51' => [
...
                               '5016524898'
                             ]
        };