unless ($get
        && $get =~ /^[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[1-9]{1,3}$/
        && !grep { $_ < 0 || $_ > 254 } split(/\./, $get) )
                { print "MYSTIFYING: invalid target specified\n"; exit(-1);}