Mega Code Archive

 

Categories / Perl / Regular Expression

 

Regex index

$text = "no and yes"; $text =~ s/(\w+) (\w+) (\w+)/$3 $2 $1/; print $text;