Thread Neu und Anfänger
(23 answers)
Opened by ascotlx at 2016-02-14 22:43
Naja, wenn wir schon angeben, das Beispiel geht auch in Perl5 recht kurz. Allerdings ist in Perl5 der sprach-interne AbKüFi nicht so ausgeprägt gewesen, wie er es in Perl6 nun ist ;-) D.h. gleich kurz wird es nur schwer werden.
Code (perl): (dl
)
1 2 3 4 5 use strict; use warnings; my ($file,$fh) = ('bla.txt'); open( $fh, '<', $file ) && print <$fh>; oder auch mit Schleife, falls die Datei zu groß ist Code (perl): (dl
)
1 2 3 4 5 use strict; use warnings; my ($file,$fh) = ('bla.txt'); open( $fh, '<', $file ) && do { print while <$fh> }; Und ich kann mir vorstellen, dass es auch noch Module gibt, die das nochmal verkürzen können. meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen! |