spezielle Daten aus Datei - #77030 (Allgemeines zu Perl)

Strat

2007-06-04 18:21

User since
2003-08-04
5246 Artikel
ModeratorIn

Code: (dl )

1
2
3

my $line;
while (<SEQUENZ>) {
   $line = $_;

Warum nicht gleich folgendes?

Code: (dl )

while( my $line = <SEQUENZ> ) {

ich empfehle, variablen stehts nur in dem kleinst moeglichen scope zu definieren, weil man sich dann kaum mehr um die aeusseren abhaengigkeiten eines blocks kuemmern muss.

Code: (dl )

while( <SEQUENZ> )

ist auch eventuell gefaehrlich, weil du die globale Variable $_ verwendest. Wenn du sie in einem aeusseren Scope auch nochmal verwendest, ueberschreibst du sie dir, z.B.

Code: (dl )

foreach ( 1..3 ) {
  print "before: $_\n";
  while( <SEQUENZ> ) {
    # mach irgendwas
  }
  print "after: $_\n";
}

nur bei foreach wird $_ automatisch "lokalisiert".

Also entweder

Code: (dl )

while( local $_ = <SEQUENZ> ) {

verwenden, oder meiner Meinung nach besser noch eine benannte Variable

Code: (dl )

while( my $line = <SEQUENZ> ) {

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