Select Code to Download

$ref_to_all_lines_in_file   # contains all lines in file minus those i
+n %hash or @array
@array;                     # contains some lines from the file
...
if($hash_count) { $ref = \%hash; }
elsif($array_count) { $ref = \@array; }
else { $ref =  $ref_to_all_lines_in_file; }

$ref = $hash_count ? \%hash : { $array_count ? \@array : $ref_to_all_l
+ines_in_file };