As a sidenote... On 02 Apr 2003 00:09:18 PST, Nicholas G. Thornton wrote:
>So I'm trying to set up a subroutine to test input types to make sure they're >the right sort (numeric, etc) I figure regex is the way to go, but it doesn't >seem to work. > } elsif ($test_type eq 'decimal' and not $input =~ m/^(\d|\.)*$/) { > # doesn't test for multiple decimals Perhaps you could look into the module Regexp::Common, on CPAN, specificall the patterns $RE{num}{real} and $RE{num}{int}. Otherwise, either lookahead or alternatives are the way to go, to check that you have at least one digit and at mosty one digit. For example: /^(?=.*\d)(\d*\.?\d*)$/ -- Bart.