на шелле в ряде случаев приходится использовать "подпорки" типа sed, это _очень_ снижает скорость. perl-у все это не нужно, перловские скрипты очень быстрые по сравнению с аналогичными шелловскими.
Я не просил писать специально для меня, а просил подкинуть...
Видать придется на bash сочинять самому, а то все кричат - Перл это круто,
а как доходит до дела - тапки одевают...
а нефиг для больших файлов хэши использовать :)
а вот так будет быстро и просто:
#!/usr/bin/perl -w
use strict;
my $str='just for init';
while (<>)
{
next if (/^$str$/);
$str=$_;
print "$_";
}