Select Code to Download

use strict;
use warnings;
...
my $excel_table  = Spreadsheet::ExcelHashTable->new($file);
        $excel_table->parse_table("Sheet1", "ID") ;
        my $excel_hash = $excel_table->get_table("ID");

 -----------------------
 | ID | Name       |
...
 -----------------------
 |  002  |  BBB    |
 -----------------------