open INPUT, "<", $input or die "Cannot open ($input) for reading: $!";
print <INPUT>;
close INPUT or die "Could not close $input: $!";