peiyuan1030 发表于 2018-8-31 09:58:51

Perl Learning - 16 (split, join, list m//, +? *? {}? ??)

$_="fred and barney went bowling last night, barney won";  if(/(?fred.+barney)/){
  print "$+{names}\n";
  # fred and barney went bowling last night, barney
  }

页: [1]
查看完整版本: Perl Learning - 16 (split, join, list m//, +? *? {}? ??)