Help for this page

Select Code to Download


  1. or download this
    qr{ [$STX] ( [^$ETX]{0,80} ) [^$ETX]* [$ETX] }x
  2. or download this
    $ perl -Mstrict -Mwarnings -e '
my ($STX, $ETX) = (chr(2), chr(3));
...
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaa
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
+aaaaaaaaaa
1234567890123456789012345678901234567890123456789012345678901234567890
+1234567890