Select Code to Download

#!/usr/bin/perl

...
} catch {
    die "Error sending email: $_";
};

W:\Development\Eclipse\FIM Send UE Data Status>perl SimpleMail.pl
Net::SMTPS>>> Net::SMTPS(0.04)
...
Try::Tiny::try('CODE(0x2c52688)', 'Try::Tiny::Catch=REF(0x2c2af30)') c
+alled at C:\Strawberry\perl\vendor\lib\Email\Sender\Role\CommonSendin
+g.pm line 58
Email::Sender::Role::CommonSending::send('Email::Sender::Simple', 'Ema
+il::Simple=HASH(0x2c526d0)', 'HASH(0x2c4ec30)') called at C:\Strawber
+ry\perl\vendor\lib\Sub\Exporter\Util.pm line 18
Sub::Exporter::Util::__ANON__('Email::Simple=HASH(0x2c526d0)', 'HASH(0
+x2c4ec30)') called at SimpleMail.pl line 29