Neu und Anfänger - #183913 (Allgemeines zu Perl)

Linuxer

2016-02-16 00:35

User since
2006-01-27
3891 Artikel
HausmeisterIn

user image

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 )

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 )

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!