/^([\d*]+)\s+([\d*]+)\s+([\d*]+)\s+([\d*]+)\s+([\d\-*]+)\s+(.+*)/
                                   add comma here ^            

##</code><code>##

$dow =~ s/,//;