Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re: Further On Down the Line

by BerntB (Deacon)
on Apr 11, 2009 at 23:17 UTC ( #757065=note: print w/replies, xml ) Need Help??

in reply to Further On Down the Line

Your problems are with basic open/read/write/close to files. The first parameter to open should not be the file name... it should be a file handle.

It is better to split the second parameter in two. See this simple example:

# Write to text file: open(my $fh, ">", $filename) or die "Failed open for write! $!"; print $fh "Foo\n"; # Prints to file close $fh; # Close file # Read from text file: open($fh, "<", $file_to_read) or die "Couldn't open! $!"; my $line = <$fh>; # Reads a line. chomp $line; # Removes eol chars (CR,LF) close $fh;

It is much better to write small test programs to check things like this out. I personally use oneliners all the time, like this:

perl -e 'open($fh, ">", "tst") or die "$!"; print $fh "XX\n"; close $f +h;'

What you really need is a good first book. There is a review link at the top of this page, it is better to go there, but you won't go wrong with "Perl Cookbook". Otherwise, for a quick look, try the shell cmds:

perldoc -f open perldoc perldoc perldoc perlrun perldoc Tk # (Added as Edit.)
(There is also a nice website,

Edit: I'm thinking of trying out Devel::REPL instead of one-liners. It seems neat.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://757065]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (9)
As of 2021-10-22 10:58 GMT
Find Nodes?
    Voting Booth?
    My first memorable Perl project was:

    Results (85 votes). Check out past polls.