if ($aolstats =~ /(\d+),(\d+)/) {
 $aolstats =  $1 . $2;
}
if ($msnstats =~ /(\d+),(\d+)/) {
 $msnstats = $1 . $2;
}
if ($wwwstats =~ /(\d+),(\d+)/) {
  $wwwstats = $1 . $2;
}

##</code><code>##

$aolstats =~ s/(\d+),(\d+)/$1$2/;
$msnstats =~ s/(\d+),(\d+)/$1$2/;
$wwwstats =~ s/(\d+),(\d+)/$1$2/;

##</code><code>##

s/(\d+),(\d+)/$1$2/ for ($aolstats,$msnstats,$wwwstats);