Something

sub getTitles()
{
	my @titles=();	
	my $recordRef=shift;
	my $title=$recordRef->{titles}->{title}->{style}->{content};
	return $title;
}

Pseudo-hashes are deprecated at loftin.pl line 131.
Argument "\x{54}\x{68}..." isn't numeric in hash element at loftin.pl line 131.
Bad index while coercing array into hash at loftin.pl line 131.

$VAR1 = [
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Whitaker, D. M.',
                       'font' => 'default',
                       'size' => '100%'
                     }
          },
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Carroll, A. L.',
                       'font' => 'default',
                       'size' => '100%'
                     }
          },
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Montevecchi, W. A.',
                       'font' => 'default',
                       'size' => '100%'
                     }
          }
        ];
$VAR1 = [
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Whitaker, D. M.',
                       'font' => 'default',
                       'size' => '100%'
                     }
          },
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Montevecchi, W. A.',
                       'font' => 'default',
                       'size' => '100%'
                     }
          }
        ];
$VAR1 = [
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Whitaker, D. M. ',
                       'font' => 'default',
                       'size' => '100%'
                     }
          },
          {
            'style' => {
                       'face' => 'normal',
                       'content' => 'Montevecchi, W. A.',
                       'font' => 'default',
                       'size' => '100%'
                     }
          }
        ];