noobie write list to file out

desertman has asked for the wisdom of the Perl Monks concerning the following question:

Dear Holy Brethren,

regarding a list data structure and a file I know use this for input:

open FILEIN, "<$fn" or die $!;

@out = <FILEIN>;

But is anything equivalent for output? ie:

open FILEOUT, ">$fn" or die $!;

<FILEOUT> = @out;

from my cave in deepest humility

Comment on noobie write list to file out

Replies are listed 'Best First'.
Re: noobie write list to file out by GrandFather (Saint) on Nov 23, 2009 at 03:36 UTC
Much better to use strictures (use strict; use warnings;), lexical file handles and three parameter open: `use strict; use warnings; open my $inFile, '<', $fn or die "Failed to open $fn: $!"; open my $outFile, '>', $fo or die "Failed to open $fo: $!"; while (<$inFile>) { ... print $outFile "..."; } close $inFile; close $outFile;` [download] Oh, and don't slurp files (use `while (<$inFile>)` instead). Update: fixed typo in code - thanks wfsp True laziness is hard work	[reply] [d/l] [select]
Re^2: noobie write list to file out by BioLion (Curate) on Nov 23, 2009 at 10:38 UTC
Also the increasingly popular `use autodie qw/open close/;` - autodie. Just a something something...	[reply] [d/l]
Re: noobie write list to file out by keszler (Priest) on Nov 23, 2009 at 01:20 UTC
See print and I/O Operators `open FILEOUT, '>', $fn or die $!; print FILEOUT @out;` [download] Please read Markup in the Monastery to better format your questions.	[reply] [d/l]