open my $output, ">", "out.txt";
print $output "derp";
close $output;