Select Code to Download

#!/usr/bin/perl
                                                                      
+          
...
}xgs) {
  print "run: <$1>\n";
}

(?:                                      # this chunk:
      $                                        # either the end of the
+ string
...
run: <bc>
run: <xyz>
run: <ijklmn>