Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: writing the finding result into a file.txt

by clueless newbie (Hermit)
on Mar 28, 2012 at 11:29 UTC ( #962156=note: print w/ replies, xml ) Need Help??


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);
added my to $dir = "c:/temp";


Comment on Re: writing the finding result into a file.txt
Download Code
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 :)
      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';
        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 :)

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (12)
As of 2015-07-06 13:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (74 votes), past polls