Select Code to Download

print "$cell->value()";

$txt->insert('end',"$worksheet->{Cells}[$row][$col]->{Val}");

#!/usr/local/bin/perl

...
}
}
}