#For getting the lower case
$dbh->{FetchHashKeyName} = 'NAME_lc';  

##</code><code>##

#For getting the upper case
$dbh->{FetchHashKeyName} = 'NAME_uc';