print X "/* Generated automatically by $0, please don't touch manually. */\n";
foreach my $x (sort keys %vars) {
# Don't export variables which contain no underscores
print X "/* Generated automatically by $0, please don't touch manually. */\n";
foreach my $x (sort keys %vars) {
# Don't export variables which contain no underscores