Zeilenumbruch für foreach - #97000 (Allgemeines zu Perl)

Strat

2007-08-01 00:54

User since
2003-08-04
5246 Artikel
ModeratorIn

@_[0] ist das erste Element von @_ im Listenkontext; grundsaetzlich sollte da $_[0] verwendet werden.

Aber du meinst wahrscheinlich

Code (perl): (dl )

sub my_function {
  foreach ( @_ ) {
    print "Zeile: $_\n";
  }
}

die Klammern bei sub my_function () solltest du weglassen (die fuehren zu Prototypen, einem ganz finsteren Kapitel von perl)

nebenbei ist

Code: (dl )

while (<PROC>) {

gefaehrlich, weil while die Variable $_ nicht lokalisiert. Da besser eine benannte variable verwenden, z.B.

Code (perl): (dl )

while( my $line = <PROC> ) {

oder - wenn du unbedingt $_ verwenden willst

Code: (dl )

while( local $_ = <PROC> ) {

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/