Hallo,

Mein Script:
--------------
#!/usr/bin/perl -w

use CGI qw(:standard);
use strict;

my $z = '';
my $tmp = '';
my @temp = '';
my @menu ='';

open (FILE, 'menu.txt');
@menu=<FILE>;
close FILE;

for ($z=5;$z>=0;$z--){
$tmp=@menu[$z];
@temp= split /,/, $tmp;
if (substr(@temp[0],0,2)*100 != @temp[0]*1){
print @temp[3]."\n";
}
}


wobei menu.txt:
0100,aaa,bbb,ccc
0101,aaa,bbb,ccc
0102,aaa,bbb,ccc
0200,aaa,bbb,ccc
0200,aaa,bbb,ccc
0202,aaa,bbb,ccc

bringt folgende Fehlermeldung:
$scalar value @menu[$z] better written as $menu[$z] ...

die Ausgabe print ist korrekt, was hat die Fehlermeldung zu sagen ?