Tags: regex,perl

Sort by: Date / Title /

  1. 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.         }

First / Previous / Next / Last / Page 1 of 1 (1 posteets)