my $country = `whois $ip | grep -Po '^Country:\s*\K.*'; chomp($country);. But seeing as the "P" in -P stands for "Perl", we might as well get rid of grep .
確定! 回上一頁