close INFILE;
close OUTFILE;
close TRASH;

unlink $trash;