#!/usr/bin/perl
$_ = "groad.net";
if (/(www)?(groad.net)/) {
print "you want to vist $2\n";
}
$_ = "www.groad.net";
if (/(www)?(.groad.net)/) {
print "you want to vist $1$2\n";
}
# ./question.pl
you want to vist groad.net
you want to vist www.groad.net
欢迎光临 曲径通幽论坛 (http://www.groad.net/bbs/) | Powered by Discuz! X3.2 |