Yet Another CPAN Grep

GD ( R/RU/RURBAN/GD-2.81.tar.gz, RURBAN, 2024; MetaCPAN )

GD/t/transp.t ( view source; MetaCPAN )

$t == $c) {
  TODO: {
    local $TODO = 'colorClosest ignores alpha';
    isnt( $t, $c, "Closest" );
    }
  } else {
    isnt( $t, $c, "Closest" );
  }
  is( $im->transparent, $im->colorClosestAlpha(

$t == $c) {
  TODO: {
    local $TODO = 'colorClosest ignores alpha';
    isnt( $t, $c, "Closest" );
    }
  } else {
    isnt( $t, $c, "Closest" );
  }
  is( $im->transparent, $im->colorClosestAlpha(