my $ary = $sth->fetchall_arrayref;
     foreach my $row (@{$ary}) {
		 $blah = @{$row}[0];