print OF1 $lines; #### print OF1 $lines{$_};