Re^2: Why doesn't this work?

Replies are listed 'Best First'.
Re^3: Why doesn't this work? by LanX (Saint) on Apr 12, 2013 at 22:35 UTC
maybe shorter? `DB<178> open $fh,"<",\"1\0 2\0 3" DB<179> print scalar do {local $/="\0"; () = <$fh> } 3` [download] update as one liner `perl -e '$/="\0"; print $a=()=<>'` [download] Cheers Rolf ( addicted to the Perl Programming Language)	[reply] [d/l] [select]
Re^4: Why doesn't this work? by choroba (Cardinal) on Apr 12, 2013 at 22:39 UTC
Even shorter: `{local $/="\0"; () = <$fh>; print $.}` [download] لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ	[reply] [d/l]