что быстрей awk или perl

Давно написал perl скрипт, который в файле содержащим уже 150 тыс. строк, ещет строки соответсвующие шаблону.
В качестве разделителя полей используется "|",
в результате получается regexp (^.+\|.+\|.+\|.+\|.+\|.+\|.+\|.+\|\|.+\|) ,
где вместо любого из (.+) может быть фраза, к примеру первая строка имя, вторая фамилия и т.д.
В результате поиск занимает порядка 30 секунд, не будет ли быстрей переписать всё это с использованием awk или grep и потом в perl обрабатывать результат вывода этих программ?