Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: perl script to print just directory names

by blue_cowdawg (Monsignor)
on Dec 06, 2012 at 20:33 UTC ( #1007647=note: print w/replies, xml ) Need Help??

in reply to perl script to print just directory names

What extra line? Just tested your code on my system and don't see an extra line. There *is* however a "blank line" between the last line the script generates and the command line prompt but I think that's a function of the shell.

Some more comments:

Not sure why you are doing this:

while(defined($file = readdir($dh)))
while($file = readdir($dh))
should suffice.

You do realize your array is going to be empty when your loop is done?

Peter L. Berghold -- Unix Professional
Peter -at- Berghold -dot- Net; AOL IM redcowdawg Yahoo IM: blue_cowdawg

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1007647]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (5)
As of 2017-11-20 18:23 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (291 votes). Check out past polls.