Yes interesting. The regular expression avoids the use of split and abs. Regular expressions are someway down my learning list so I must simply note it for the future. Clearly Perl has many attack lines.