open(my $input,"<",$input_file) or die "Could not open $input_file because $!\n"; while(<$input>) { print; }