perl beginner question

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

Replies are listed 'Best First'.
Re: perl beginner question by marto (Cardinal) on May 24, 2009 at 09:49 UTC
Perhaps the `remove_tree` function from the File::Path module (it's a core module) would be of interest here. Martin	[reply] [d/l]
Re: perl beginner question by Anonymous Monk on May 24, 2009 at 09:02 UTC
show your code	[reply]
Re^2: perl beginner question by Anonymous Monk on May 24, 2009 at 09:10 UTC
`sub removedir { my $dir= shift; opendir DIR, $dir or die "opendir $dir: $!"; for (readdir DIR) { next if /^\.{1,2}$/; my $path = "$dir/$_"; #check $path is a file? if(-f $path) { print "file: $path\n"; } } }` [download]	[reply] [d/l]
Re^3: perl beginner question by CountZero (Bishop) on May 24, 2009 at 11:39 UTC
And which one is "line 58"? CountZero A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James	[reply]
Re: perl beginner question by lamprecht (Friar) on May 24, 2009 at 14:54 UTC
You will get the best help if you post a stripped down runnable example that demonstrates your problem. Most of the time you will see, that while composing such an example you find the bug yourself and don't need to post it... Cheers, Christoph	[reply]
Re^2: perl beginner question by Perlbotics (Archbishop) on May 24, 2009 at 18:47 UTC
Good advice/observation. Reminds me remotely of Did you talk to the bear? - found here: brian's Guide to Solving Any Perl Problem. Did you talk to the bear? Explain your problem aloud. Actually say the words. For a couple of years I had the pleasure of working with a really good programmer who could solve almost anything. When I got really stuck I would walk over to his desk and start to explain my problem. Usually I didn't make it past the third sentence without saying ``Never mind---I got it''. He almost never missed either. Since you will probably need to do this so much, I recommend some sort of plush toy to act as your Perl therapist so you do not annoy your colleagues. I have a small bear that sits on my desk and I explain problems to him. My wife does not even pay attention when I talk to myself anymore.	[reply]
Re^2: perl beginner question by Anonymous Monk on May 24, 2009 at 15:00 UTC
Hi Christoph, Thanks for the input.try to post like what you suggested on next time...	[reply]
Re: perl beginner question by bradcathey (Prior) on May 24, 2009 at 12:18 UTC
You have a path or permissions problem, no doubt. —Brad "The important work of moving the world forward does not wait to be done by perfect men." George Eliot	[reply]
Re: perl beginner question by Anonymous Monk on May 24, 2009 at 14:53 UTC
thanks guys.. i fixed the problem, it is due to the \n at the end of the directory name which is read from a file,i fixed that with a trim function	[reply]
Re^2: perl beginner question by marto (Cardinal) on May 24, 2009 at 16:59 UTC
Are you using chomp? Martin	[reply]