##
['123','jeff','tortoise','qwerty']
####
my @row = $bigarray[$count];
print "dumper1:".Dumper(@row);
my $item = shift @row;
print "dumper2:".Dumper($item);
####
dumper1:$VAR1 = [
'Berronar\'s Salve',
'Heroic',
'Forgotten Realms Player\'s Guide'
];
dumper2:$VAR1 = [
'Berronar\'s Salve',
'Heroic',
'Forgotten Realms Player\'s Guide'
];