Select Code to Download

use Spreadsheet::ParseExcel;
use Data::Dumper;
$filename="Book2.xls";
...
push @{ $data{$master_key}}, \%set;
print Dumper %data;
}

$var1='2';
$var2=[{
...
        name=>ravi,
}
];