@array_A1= split (/$column_separator/,"$columns[$column_number]");   

##</code><code>##

@array_A1= split (/$column_separator/,"$columns[$column_number]");   
@array_A2=@array_A2,@array_A1);

##</code><code>##

push @array_A2, $columns[$column_number];