Select Code to Download

method do_format (Str $line)
 {
 ##experiment with parsing

 my $simples = qr{\*\*};  # extensible by user.  Same opening and clos
+ing.
 my $ps= qr{(?<prematch>.*?)
...
    }
 return join ('', @results);
 }