Help for this page

Select Code to Download


  1. or download this
    $ perl -E '
say for (
...
a\\\b
a\\\\b
$
  2. or download this
    $ perl -E '
> @arr = map { q{A} . do { chr 0x5c } x $_ . q{B} } 1 .. 4;
...
A\\\B
A\\\\B
$