Re^2: foreach loop and creating files with "$

Replies are listed 'Best First'.
Re^3: foreach loop and creating files with "$_" by wjw (Priest) on Jul 22, 2014 at 04:35 UTC
`my $file = "file"; my $temp = "temp"; foreach (1..5){ open $file, '>', "$temp" . "$_"; print $file "THIS IS DATA"; }` [download] or `my $file = "file"; my $temp = "temp"; foreach my $end (1..5) { open $file, '>', "$temp" . "$end"; print $file "THIS IS DATA"; }` [download] (not tested) Personal preference only... ...the majority is always wrong, and always the last to know about it... Insanity: Doing the same thing over and over again and expecting different results... A solution is nothing more than a clearly stated problem...otherwise, the problem is not a problem, it is a facct wjw	[reply] [d/l] [select]
Re^4: foreach loop and creating files with "$_" by toolic (Bishop) on Jul 22, 2014 at 13:41 UTC
What's wrong with always quoting "$vars"? Less clutter, too: `open $file, '>', $temp . $_;` [download]	[reply] [d/l]
Re^3: foreach loop and creating files with "$_" (path tiny spew) by Anonymous Monk on Jul 22, 2014 at 19:38 UTC
First with $_ then without `use Path::Tiny qw/ cwd path tempfile /; ## in cwd path( "temp$_" )->spew("THIS IS DATA") for 1 .. 5; ## in $TMP directory tempfile( 'tempjamesXXXX' )->spew("THIS IS DATA") for 1 .. 5;` [download]	[reply] [d/l]


Come for the quick hacks, stay for the epiphanies.
	PerlMonks