eval {
  require MQSeries;
  MQSeries->import;
};
$@ and warn $@;
[download]

sub cond_use {
  (my $module = shift().".pm") =~ s<::></>g;
  eval {
    require $module;
    $module->import(@_);
  };
  $@ and warn $@;
}
cond_use "MQSeries";
[download]

_________
broquaint