Postal Code or Zip Code 1

[wood]

I am new to perl, and am trying to check if the data entered is a string or numeric. IE if the person entered a Postal Code or Zip Code.

Could someone assist me? Thanks!

 

[azzazzello]

my $input = <>;  #get the string
if ($input =~ /^\d+$/)   #checks if the variable consists of   
                         #numbers in its intirety 
{  do something numeric with it }
else
{  treat it like a string  }

 

[williey]

I'll always follow the rule of "If no calculation on the field is required, define the field as string else numeric".

This will make compairison a lot easier down the road.

 

[wood]

Thanks azzazzello that worked perfectly! I give you a star!

 

[mlibeson]

Keep in mind that US codes have 2 valid formats.

12345
and
12345-1234



Michael Libeson

 

[wood]

Yes, I do realize this, but I am validating from what our system stores, and we only use the first five digits.

Thanks!

 

[mlibeson]

if they are able to enter the extended format, but you want only the first 5 digits, the code below will help.

$input = '12345-1234';

if ($input =~ /^([0-9]{5,5})\-[0-9]{4,4}$/) {
     $input = $1;
}

Apply this code before your check:
if ($input =~ /^\d+$/)


Michael Libeson