Help for this page

Select Code to Download


  1. or download this
    $_ = '-XXX--XXXXXXXXX...XXXXXXWW--WWW.WWWZZZ---ZZZWW..W-.-WWWWWXXX';

printf "%s-%s: %s\n", $-[0]+1, $+[0], $1
    while /[.-]*([^.-])(?:\1|[.-])*/g;
  2. or download this
    1-24: X
25-35: W
36-44: Z
45-57: W
58-60: X