Perl Tipps und Tricks: Difference between revisions

From Lolly's Wiki
Jump to navigationJump to search
(Die Seite wurde neu angelegt: „Kategorie:Perl ==Unread while reading from filehandle== Dov Grobgeld made my day! <source lang=perl> # Found at a comment of Dov Grobgeld at https://gro…“)
 
No edit summary
Line 1: Line 1:
[[Kategorie:Perl]]
[[Kategorie:Perl|Tipps und Tricks]]


==Unread while reading from filehandle==
==Unread while reading from filehandle==

Revision as of 14:06, 6 October 2014

Tipps und Tricks

Unread while reading from filehandle

Dov Grobgeld made my day!

# Found at a comment of Dov Grobgeld at https://groups.google.com/d/msg/comp.lang.perl/7fPyGpWpP8M/hc7xTMvAoW0J
while($_ = shift(@linestack) || <IN>) {
         :
             push(@linestack, $whatever);   # unread
}