Select Code to Download

use strict;
use Data::Dumper;
...
__DATA__
abc,def,excel1.xls,12,some,time
hj,uyi,excel2.xls,12,more,time2

$VAR1 = {
          '' => [
...
                     ]
                   ]
        };