程嶏清单7-12.txt

来自「< linux网络编程工具>>配套源码」· 文本 代码 · 共 4 行

$string = "And little lambs eat ivy";
$string =~ /l[^s]*s/;
print "($`) ($&) ($')\n";