chomp(@stats = `$dspambin/dspam_stats`);

foreach $stat (@stats) {
  chomp($user = `awk '{print \$1}' @stats`;)
  push(@users, $user);
}