Re: writing the finding result into a file.txt

in reply to writing the finding result into a file.txt

use File::Find;
use strict;
use warnings;

my $dir = "c:/temp";
sub edit {
print FILE "$File::Find::name"."\n";
}
open(FILE, ">file.txt");
find(\&edit,$dir);
close(FILE);
[download]

added my to $dir = "c:/temp";

Comment on Re: writing the finding result into a file.txt Download Code

Replies are listed 'Best First'.
Re^2: writing the finding result into a file.txt by The Mass (Initiate) on Mar 28, 2012 at 17:16 UTC
I tried to use strict but it failed , and I tried to use the code above for(clueless newbie) but it didn't work :( what is the wrong , please help me :)	[reply]
Re^3: writing the finding result into a file.txt by clueless newbie (Curate) on Mar 28, 2012 at 17:34 UTC
I'm assuming you're on Windows. Perhaps you don't have a "C:\temp"? (Be careful to either use "C:/temp" note the use of double quotes and the forward slash or to use 'C:\temp' single quote and backslash. If you double quote and backslash you'll have to escape the backslash i.e. "c:\\temp". Also: add a my to the $dir as in `my $dir='c:\temp';` [download]	[reply] [d/l]
Re^4: writing the finding result into a file.txt by The Mass (Initiate) on Mar 28, 2012 at 18:10 UTC
thanks bro , it is work done but I have a small question : why when we add a my to $dir , it is work done ?? and without it , it doesn't work? please answer my small question . thanks again for your helping :)	[reply]
Re^5: writing the finding result into a file.txt by nemesdani (Friar) on Mar 29, 2012 at 07:11 UTC

In Section Seekers of Perl Wisdom