I rather suspect that the control structure change isn't going to help you. I'd be very curious to know how much time is being consumed by the elided lines ( . . . .) in your loop.

That said, here is one way -

while (@array) 
{
    my $info_element = shift @array;

    $sql= "SELECT C58XX.CCLMyy, C58XX.CLINyy FROM C58XX
           WHERE C58XX.CCLMyy=$info_element AND 
           C58XX.CLINyy=$X_LINE ";
    ....
}
[download]

(Premature Optimization is the root of all Evil ....)