perl - 尝试在 Perl 中使用 Module 并在模块不可用时打印消息

Question

我希望能够在 Perl 中做到这一点(下面的代码是 Python 哈哈)

try:
  import Module
except:
  print "You need module Module to run this program."

有谁知道怎么做？

Answer 1

像这样，use Net::SMTP如果您安装了模块，或者俗气的sendmail标注作为最后的手段。

my $mailmethod = eval "use Net::SMTP; 1" ? 'perl' : 'sendmail';