Help for this page

Select Code to Download

Select or download this

BEGIN {
    my $sub;
...
}
# ...
  _split($text, map {_qr($_)} @_);