perl -e 's&&rob@cowsnet.com.au&&&split/[@.]/&&s&.com.&_&&&print'
In reply to Re: Perl 5.00503 distribution by rob_au in thread Perl 5.00503 distribution by Pavel