if ($P =~ /(zeichenfolge)/) { $neue_var = $1 }