#!C:/Perl/bin/perl.exe -pi.bak tr/,//d;