All,
I have a simple sql process in Perl that returns distinct id's.  If I load the id's into an array via a $row = $query->fetchrow_array, it dumps ALL of the values from the one column into arry index  '0' / $row[0].  Is there a way to read in / fetch a distinct column of values from a query and place each element / item in a different array index....$row[0],$row[1],.....$row[n]!  The data is currently in $alignment.  I can load the data into an array and it is fine. 
Query Return:
i.e.  $alignment = 'A01','B22','C99',....'nth'.

$row[0] = 'A01', $row[1] = 'B22', $row[2] = 'C99'...$row[n] 

Finally, I am doing this to pass those id's to my Perl adn Sql code.  This process will keep me from setting up several perl processes for the same thing.  Please help....