Select Code to Download

$re1 = qr/a/;
$re2 = qr/b/;
...
$str =~ $re1;
$str =~ $re2;
$str =~ $re3;

$str = "abc";
$re1 = qr/a/;
...
      $str =~ $re2;
   }
}