foreach my $file (@onlyfiles) {
  unlink "$basedir/$mesgdir/$file";
}