Software

One simple way is to use the the .split() method of the text string which will separate the string into an array. Clunky, but easy to implement.

$eMailID = $ItemAuthorEmail.split("@")[0]
$eMailDomain = $ItemAuthorEmail.split("@")[1].split(".")[0]
$eMailSuffix = $ItemAuthorEmail.split(".")[1]

Neil :)

Ooops, didn't notice it was Perl! Saw the $variables and immediately read it as PowerShell. Still might work if there's a split method but I have absolutely no idea if there is!

Falls over, anyway with a user@domain.net.uk

Try -

$position = rindex($itemAuthorEmail, ".") + 1;
$eMailSuffix = substr($itemAuthorEmail, $position);

With regards to eMailDomain you would have to handle cases of one or more ".". Use index() rather than rindex() for eMailID.

Also very important to check that $itemAuthorEmail contains a valid e-mail address!