Select Code to Download

bless( \*{'Fh::fh00001test.zip'}, 'Fh' )

my $zip = Archive::Zip->new();
$zip->readFromFileHandle($fh);