Regular Expression Perl

  1. Home
  2. Perl
  3. Regular Expression
  4. $1 gets A, $2 gets B
$str = "A and B";
$str =~ s/(A) and (B)/$2, $1/i;  
print $str;