Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: exit the loop corrected

by lemming (Priest)
on Jul 10, 2002 at 22:12 UTC ( #180889=note: print w/replies, xml ) Need Help??

in reply to exit the loop corrected

while ( $theSubBuild ne 'sci.bld' || 'esel.bld')
is equivalent to
while ( $x ne 'ya' || 1 )

I assume you meant for the loop to stop if $theSubBuild is equal to either of your strings. What Perl is doing is seeing if either of the expressions on both sides of the || are true. 'esel.bld' will always be true.

What you probably want is:
while ( $theSubBuild ne 'sci.bld' && $theSubBuild ne 'esel.bld')

Update: Fixed a bit of spelling and added comments since I was editing anyways.

I'm uneasy about the grep system call into a file and then reopening the file. I'd rather just read from a pipe if I was going to use the system grep through a bunch of files.

I tend to just read the files and get my info that way and leave the OS out of it.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (1)
As of 2021-09-18 23:50 GMT
Find Nodes?
    Voting Booth?

    No recent polls found