unlink($filename) while -f $filename;