Help for this page
>perl -wMstrict -le "my $s = qq{fee\x01fie\x01foe}; ... " fee--fie--foe biz++baz++boz