m// Operator Help 1

[kennygadams]

Hi Perlies,

How is this done in Perl....

if($image_number =~ m/I need help in this area. This is where the account number is and can be anywhere from 1 to 7 digits long. How do you write 1 to 7 digits long with Perl?-\d\d\d\d-\d\d\d\d-\d\d\d\d/){}

Thanks in advance for your help.

Kenny Adams

http://www.acclaimimages.com/

 

[MillerH]

Assuming that your testing to for the validity, then you need to use anchors as well.

if ($image_number =~ m/^\d{1,7}$/) {
    # Number 1 to 7 digits long.  No extra characters are allowed.
} else {
    # Put your error handling hear.
}

 

[kennygadams]

Thanks MillerH, that's what I needed.


Kenny Adams

http://www.acclaimimages.com/