package Wrap::PDL;

use PDL;
use base 'Exporter'; # for simplicity...

sub my_method {
  # Code
}

1;

##</code><code>##

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

#...

if ($has_PDL)
{
  my_method(0, 0, $value);
}

##</code><code>##

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