Help for this page

Select Code to Download


  1. or download this
    while (<main::DATA>)
{
...
  /^(?:(?:(\d+)\s*c\s*)|(?:(\d+)\s*w\s*)|(?:(\d+)\s*r\s*))+/i;
  print "With \\s*       :   1='$1', 2='$2', 3='$3'\n";
}
  2. or download this
    Testing '1c'
Without \s*    :   1='1', 2='', 3=''
...
Testing '2r1c'
Without \s*    :   1='1', 2='', 3='2'
With \s*       :   1='1', 2='', 3='2'