Salut!

Allez perl trolling :

perl -e 'open FICHIER,"./log" or die "eff!";
foreach $_ (<FICHIER>)
{
s/([^@ ]+)\@([^@ ]+)domain.com/[EMAIL PROTECTED]/g;
print;
}
---
Voila Perl Roulaize!
-- 
Init64 - http://www.init64.com


Répondre à