END { print STDERR "Modules used:\n", map { " $_\n" } sort values %INC; }