Help for this page
c:\@Work\Perl\monks>perl -wMstrict -le "use Data::Dump qw(pp); ... '|' -> ["", "|", ""] '||' -> ["", "|", ""] '|||' -> ["", "|", ""]