# Ganz für Anfänger;)

for (my $i = 0; $i < @inhalt; $i++) {
  if ( $inhalt[$i] =~ /ausdruck/ ) {
    my $pos = $i; # das ist der Index 
    # und so weiter
  }
}