Select Code to Download

open $hash{'t'},"test.txt";
...
...
                    # not the contents of the file

close $hash{'t"];

open $hash{'t'},"test.txt";
$a = $hash{'t'};                 # pass the hash value 
...
@lines = <$a>;                # and suddenly grabbing the @lines 
print @lines;                     # results in correct output!
...