Select Code to Download

package Wrap::PDL;

...
}

1;

my $has_PDL = eval "use Wrap::PDL qw(my_method); 1";

...
{
  my_method(0, 0, $value);
}

my $has_PDL = eval {
  require Wrap::PDL;
  Wrap::PDL->import(qw(my_method));
  1;
}