Help for this page

Select Code to Download


  1. or download this
    my @fields  = defined $pattern? split $pattern, $line : split ' ', $line;