Perl Regex: swap words

#!perl -w
$/ = "/n";

$_ = "one two remainder ... ";
s/([^ ]*) *([^ ]*)/$2 $1/;
print;
阅读更多
想对作者说点什么?

博主推荐

换一批

没有更多推荐了,返回首页