open my $fh, ">", "somefile.txt"        or die "Can't open file: $!";
print $fh "This is written to a file\n" or die "Can't print to file: $!";