>>166

sub find_msg
{
　　while($file=<*>){
　　　　unlink $file;
　　}
　　return 0;
}

これでいいはずだよ。
がんばってね！