[SOLVED] PERL: How to write a new file?

jimtony · 11-23-2011, 08:33 PM

Hi all,
I have a problem when writing text to a new file.

Code:

#!/usr/bin/perl

use strict;
use warnings;

open( my $fh," > output.txt");

print $fh,"this is test1.\n";
print $fh,"this is a test2.\n";

close $fh;

And the output of this script is:

Quote:

GLOB(0x8d52768)this is test1.
GLOB(0x8d52768)this is a test2.

And the output.txt file is empty.
I do not know why.

firstfire · 11-23-2011, 09:50 PM

Hi.

There should be no comma between file handler and text:

Code:

print $fh "this is test1.\n";
print $fh "this is a test2.\n";

jimtony · 11-23-2011, 10:33 PM

Thank you.firstfire.
That is the root cause.