%INC = %old_INC;

##</code><code>##

for (keys %INC) {
	delete $INC{$_} if ! $old_INC{$_};
}