僅在 Perl 中進行一次匹配
Perl 中有一個更簡單的 match 運算子 - ?PATTERN? 運算子。它基本上與 m// 運算子相同,只是它僅在每次呼叫 reset 之間在您搜尋的字串中匹配一次。
例如,您可以使用它來獲取列表中的第一個和最後一個元素 −
範例
#!/usr/bin/perl @list = qw/food foosball subeo footnote terfoot canic footbrdige/; foreach (@list) { $first = $1 if /(foo.*?)/; $last = $1 if /(foo.*)/; } print "First: $first, Last: $last\n";
當執行上述程式時,將產生以下結果 −
First: foo, Last: footbrdige
廣告