View: Perl - Expression régulière pour tester la validité d'une adresse IP

1. Perl - Expression régulière pour tester la validité d'une adresse IP
   1 year ago by henri
   1. while($addr !~ /^([O1]?\d\d?|2[0-4]\d|25[0-5])\.([O1]?\d\d?|2[0-4]\d|25[0-5])\.([O1]?\d\d?|2[0-4]\d|25[0-5])\.([O1]?\d\d?|2[0-4]\d|25[0-5])$/){
   2.                 print "Please give the IP address of the remote server:\n";
   3.                 $addr = get_answer();
   4.         }
   adresse ipexpression régulièreipip addressperlregexregular expression
   View source