Yet Another CPAN Grep

PDL-Graphics-Gnuplot ( E/ET/ETJ/PDL-Graphics-Gnuplot-2.032.tar.gz, ETJ, 2024; MetaCPAN )

PDL-Graphics-Gnuplot/t/plot.t ( view source; MetaCPAN )

() };

is $@, '';
isa_ok($w, 'PDL::Graphics::Gnuplot', "Constructor created a plotting object");

isnt $PDL::Graphics::Gnuplot::gp_version, '', "Extracted a version string from gnuplot" or diag "Raw o

 = gpwin( 'dumb', size=>[79,24],output=>$testoutput, wait=>1) };
is($@, '', "constructor works");
isnt ref $w, '', "constructor works";

SKIP:{
    # Check timeout.
    skip "Skipping timeout test, wh

($@, '', "regularising image succeeded (@$dims)");
  }
  eval {$w->plot({with => 'fits'},$r9)};
  isnt $@, '', "with 'fits' only if FITS header";
  my @dims = $r9->dims;
  my $h = PDL::Graphics::Gnupl