my $lineCounter = 0; my $line = ""; open(FILE, '<', $filename) || die "Error: Could not open!!!"; while( $line = ) { if ( ($line =~ /# Ausdruck1/) || ($line =~ /# Ausdruck 2/) || ($line =~ /# Ausdruck 3/) ) { $contentLNKArray[$lineCounter++] = $line; } }