fixed for newer perl
[tridge/junkcode.git] / newline.pl
1 #!/usr/bin/perl
2
3 my $fname = "foo\nbar";
4
5 open(FILE,">$fname") || die "Couldn't open $fname\n";
6