Re^3: do {$i++} until vs. $i++ until


Just another Perl shrine
	PerlMonks

Re^3: do {$i++} until vs. $i++ until

by ikegami (Patriarch)

on Mar 25, 2008 at 08:36 UTC ( [id://676071]=note: print w/replies, xml )

Need Help??

in reply to Re^2: do {$i++} until vs. $i++ until
in thread do {$i++} until vs. $i++ until

Those two snippets aren't equivalent. Aside from the fact that the latter also exits if <STDIN> returned undef, you reversed the order of the loop body (...) and the exit condition (last INPUT if $line eq ".\n";)

Comment on Re^3: do {$i++} until vs. $i++ until Select or Download Code

Replies are listed 'Best First'.

Re^4: do {$i++} until vs. $i++ until
by hipowls (Curate) on Mar 25, 2008 at 09:17 UTC

True they are not functionally equivalent but I didn't care to replicate the bug of looping on a closed file descriptor;-) It works properly when used in a command pipeline.

As far as last INPUT if $line eq ".\n" goes it is probably correct to put it at the top of the loop since ".\n" is being used as an equivalent to EOF. Whatever is done with ".\n" most likely requires special handling of some sort, for example a sendmail equivalent wouldn't include it in the message and would treat it the same as EOF.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://676071]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others taking refuge in the Monastery: (2)

As of 2024-04-26 01:38 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found