my $p_str = join ',', ('?') x @array;
my $sql = "
    SELECT C58XX.CCLMyy, C58XX.CLINyy
      FROM C58XX
     WHERE C58XX.CCLMyy IN ( $p_str )
       AND C58XX.CLINyy = $X_LINE
";
my $sth = $dbh->prepare( $sql );
$sth->execute( @array );