Re: Console output != file output

[toolic]

Tip #1 from the Basic debugging checklist: warnings

print() on closed filehandle FH at

You are opening the file for input, not output: see open. This works for me:

use warnings;
use strict;

my $type = 123;
open (FH, '>out.txt');
print FH "start" . $type . "end"; 
close FH;

[perlaintdead]

He should be doing 3 arg open and would be best if he change that file handle to a var. Just some best practices.

use warnings;
use strict;

my $type = 123;
my $FH;
open ($FH, '>', 'out.txt');
print $FH ("start" . $type . "end"); 
close $FH;