for my $name (@names) { open OUTPUT ">$name.ini" or die "Bad Thing: $!\n"; print OUTPUT <