Funkce Perl grep () je filtr, který spouští regulární výraz na každém prvku pole a vrací pouze prvky, které se vyhodnotí jako skutečný. Používání regulárních výrazů může být velmi silné a složité. Funkce grep () používá syntaxi @List = grep (Expression, @array).
Použití funkce Grep () k vrácení pravdivých výrazů
@myNames = ('Jacob', 'Michael', 'Joshua', 'Mathew', 'Alexander', 'Andrew');@grepNames = grep (/ ^ A /, @myNames);
Pole @myNames považujte za řadu očíslovaných rámečků, od zleva doprava a číslovaných počínaje nulou. Funkce grep () prochází každým z prvků (polí) v poli a porovnává jejich obsah s regulárním výrazem. Pokud je výsledek skutečný, pak se obsah přidá do nového pole @grepNames.
Ve výše uvedeném příkladu regulární výraz / ^ A / hledá jakoukoli hodnotu začínající velkým písmenem A. Po prosévání obsahu pole @myNames se hodnota @grepNames stane („Alexander“, „Andrew“), jedinými dvěma prvky, které začínají velkým písmenem A.
Obrácení výrazu ve funkci Grep ()
Jedním z rychlých způsobů, jak zefektivnit tuto konkrétní funkci, je obrátit regulární výraz s operátorem NOT. Regulární výraz pak hledá prvky, které vyhodnocují
Nepravdivé a přesune je do nového pole.@myNames = ('Jacob', 'Michael', 'Joshua', 'Mathew', 'Alexander', 'Andrew');@grepNames = grep (! / ^ A /, @myNames);
Ve výše uvedeném příkladu regulární výraz hledá nějakou hodnotu, která nezačne velkým písmenem A. Po prosévání obsahu pole @myNames se hodnota @grepNames stane ('Jacob', 'Michael', 'Joshua', 'Matthew').
O uživateli Perl
Perl je přizpůsobivý programovací jazyk, který se často používá k vývoji webových aplikací. Perl je interpretovaný, nekompilovaný jazyk, takže jeho programy zabírají více času CPU než kompilovaný jazyk - problém, který se s rostoucí rychlostí procesorů stává méně důležitým. Psaní v Perlu je však rychlejší než psaní ve kompilovaném jazyce, takže ušetříte čas.