Oops -- mistyped:
if ($value =~ /^[0-9]+(,[0-9]+)*$/) {
should be correct i think.
Sorry :(
George
_______________________________________________ Perl-Unix-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
