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