Greetings,
Please help me. I am trying to do pattern matching for an IP address. I have
tried the following and it does not work:
unless ( $ip =- /[0-223]\.[0-255]\.[0-255]\.[0-255]/ )
        {
                die ( "Invalid IP\n" );
        }
print ( "Valid IP" );

Is there a way I could actually do this without splitting the IP and working
on each octect separately?

All suggestions welcome.

Kind Regards

Langa

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to