Subject: | Unable to call open |
Passing a flattened out hash gets not-a-hashref error; passing hashref gets fatal error.
Tried using v5.16.2 & v5.18.0.
Example from 5.18.0:
lembark@bird:tmp $ perl -MMail::Mailer -d -E 0
Loading DB routines from perl5db.pl version 1.39_09
Editor support available.
Enter h or 'h h' for help, or 'man perldebug' for more help.
main::(-e:1): 0
DB<2> x $m = Mail::Mailer->new( 'smtp' );
0 Mail::Mailer::smtp=GLOB(0x277b440)
-> *Symbol::GEN1
DB<3> x $m->open( qw( To 3147573477@tmomail.com From lembark@wrkhors.com Subject: test of email ) );
Can't use string ("To") as a HASH ref while "strict refs" in use at /opt/perl/5.18/lib/site_perl/5.18.0/Mail/Mailer.pm line 187.
DB<4> x $m->open( { qw( To 3147573477@tmomail.com From lembark@wrkhors.com Subject: test of email ) } );
Died at /opt/perl/5.18/lib/site_perl/5.18.0/Mail/Mailer.pm line 158.
DB<5> x Mail::Mailer->VERSION
0 2.12