my $ref =  $dbh->selectall_arrayref($sql,undef,'no');          
@id = map{ $_->[0] } @$ref;