Also, was ich machen möchte sieht in Perl so aus:
Code: Select all
@neu = grep(!/^something$/,@alt);Code: Select all
$neu = preg_grep(!"/^something$/",$alt);
$neu = preg_grep("!/^something$/",$alt);
Code: Select all
@neu = grep(!/^something$/,@alt);Code: Select all
$neu = preg_grep(!"/^something$/",$alt);
$neu = preg_grep("!/^something$/",$alt);
Code: Select all
$bla = preg_grep ("/^something$/", $bla, PREG_GREP_INVERT);