• Als Spam markieren
• Beitrag melden

• 
  Diese Gruppe Alles

• Archiv
• RSS-Feeds

• Kontakt
• Hilfe
• Impressum
• Datenschutz

perbug ? - warum wird Element aus array geloescht

Hallo,

habe folgendes Problem:

_____________________________________________
#!/usr/bin/perl
use strict;

my @list = ("a","b","c");

foreach (@list)
{
print "list[0]: $list[0]\n";
print "list[1]: $list[1]\n";
print "list[2]: $list[2]\n";
while(<HANDLE>)  {  }
print "list[0]: $list[0]\n";
print "list[1]: $list[1]\n";
print "list[2]: $list[2]\n";
exit;
}
_____________________________________________

Ausgabe:

list[0]: a
list[1]: b
list[2]: c
list[0]:
list[1]: b
list[2]: c

Warum löscht die while-schleife das erste Element ????
Getestet mit  perl v5.6.0 und v5.8.4.

Bin für jeden Tip dankbar.

Gruss .. Markus

Antworten