Another fun way is to use `reverse' and `numeric/string conversion' as below.
perl -le 'print 0+reverse int 0+reverse "1.2.3.45"' 45 Best regards, Todd -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/