Mega Code Archive

 

Categories / Perl / Regular Expression

 

Greedy Matches

$p="pattern"; #A greedy match matches the entire pattern $p =~ /(.*)/; print "1==>$1<==\n";