frage zu perl

[karl wichmann]

Hallo

vielen dank für dein interesse.

funktoniert leider nicht.

Hallo,

@matching= grep {  # Iterator ist $_
      $_->[0] =~ /^$data[1]/i &&
       $_->[1] =~ /^$data2/i &&
       $_->[2] =~ /^$data3/i &&
       $_->[3] =~ /^$data4/i &&
       $_->[4] =~ /^$data5/i &&
       $_->[5] =~ /^$data6/i &&
       $_->[6] =~ /^$data7/i &&
       $_->[7] =~ /^$data8/i

So sollte es eigentlich funktionieren.