Select Code to Download

  our $rgx_plain = qr/^([a-z]+)\d*$/;
  our $rgx_fancy = qr/
...
                       \d*       # optional digits
                       $         # end of string
                     /x;

  say $rgx_plain;
  say clean_regex($rgx_fancy);

  say clean_regex($rgx_plain);