my @name; my @name1; while (my $row = $sh2->fetchrow_arrayref) { push @name, $row; push @name1, @$row; } # look at the difference print "@name\n"; print "@name1\n";