Aus Textdatei nach bestimmten Wort Wörter auslesen - #170684 (Allgemeines zu Perl)

Linuxer

2013-09-26 16:37

User since
2006-01-27
3890 Artikel
HausmeisterIn

user image

Hi,
nur eine Anmerkung:

mit my @wds = splice([split(/[^\w.]+/)],2); wäre ich (noch) ~~vorsichtig~~zurückhaltend.
Einmal, weil es erst ab 5.14.0 verfügbar ist und
nochmal weil es auch in 5.18.0 noch als hochexperimentell bezeichnet wird.

perldoc -f splice
Starting with Perl 5.14, splice can take scalar EXPR, which must hold a reference to an unblessed array. The argument will be dereferenced automatically. This aspect of splice is considered highly experimental. The exact behaviour may change in a future version of Perl.

Daher mit splice() auf zwei Zeilen:

Code: (dl )

1
2

my @wds = split(/[^\w.]+/);
@wds = splice(@wds,2);

Oder X-mal shift():

Code: (dl )

1
2

my @wds = split(/[^\w.]+/);
shift @wds for 1 .. 2;

oder mit Array-Slice

Code: (dl )

1
2

my @wds = split(/[^\w.]+/);
@wds = @wds[ 2 .. $#wds ];

edit:
noch eine Variante (ich wusste, mir fehlte da noch was):

Code: (dl )

1
2

# ignore the first two fields
( undef, undef, my @wds ) = split(/[^\w.]+/);

Last edited: 2013-09-26 22:05:34 +0200 (CEST)

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!