Perl Regex: replace and assign

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

$fred = "this is justification";
($tom = $fred) =~ s/this/that/;
print $fred;
print $tom;

阅读更多
想对作者说点什么?

博主推荐

换一批

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