From Tie::DBI:

        # if we get here, we can fetch the names of the fields
        my %fields = map { lc($_)=>1 } @{$sth->{NAME}};
[download]

See that nice "lc"?

I suspect that since field names are case insensitive on the DB side, but hashes are not, the author presumed that you'd always use lowercase. So I bet you didn't need to change your database... just your access code.

-- Randal L. Schwartz, Perl hacker