Help for this page
use strict; use warnings; ... say mixedregex("bar"."\0"."123"); __END__
$ perl 11142131.pl 7 4 barS