Re: How do tell Perl to break only on undef?

That's why Perl has defined:

while (defined( my $i = $t->get )) { print $i; };
[download]

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

Comment on Re: How do tell Perl to break only on undef? Select or Download Code

Replies are listed 'Best First'.
Re^2: How do tell Perl to break only on undef? by myuserid7 (Scribe) on Oct 22, 2017 at 10:53 UTC
I cannot believe I forgot defined Thanks!	[reply]