for (keys %files) {
	print "Gone: $_\n";
}