Unable to create object. Constructor stuck at read (probably stdin)
#!/usr/bin/perl
use Mail::Audit;
my $item = Mail::Audit->new();
strace of this codes tells that it is wating for input. I thought this
+ will read the mail from user mail.
**********************
open("/usr/share/perl/5.8/constant.pm", O_RDONLY|O_LARGEFILE) = 5
ioctl(5, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfdc5e98) = -1 ENOTTY (Inapp
+ropriate ioctl for device)
_llseek(5, 0, [0], SEEK_CUR) = 0
read(5, "package constant;\n\nuse strict;\nu"..., 4096) = 3051
_llseek(5, 3050, [3050], SEEK_SET) = 0
_llseek(5, 0, [3050], SEEK_CUR) = 0
close(5) = 0
read(4, "ore (man MIME::Parser) set C<mim"..., 4096) = 4096
read(4, " given, Mail::Audit will use har"..., 4096) = 4096
read(4, " treat the\n # mailbox as a no"..., 4096) = 4096
brk(0x8300000) = 0x8300000
brk(0x82ff000) = 0x82ff000
read(4, "rn $lock_error if $lock_error;\n "..., 4096) = 4096
read(4, "ow in tmp/. hardlink to all the"..., 4096) = 4096
read(4, " for eternity.\n\nThis is a final "..., 4096) = 4096
brk(0x8320000) = 0x8320000
brk(0x831f000) = 0x831f000
read(4, "ail message with the given value"..., 4096) = 4096
read(4, ">?From )\n .*?\\b\n (Post(m"..., 4096) = 2878
read(4, "", 4096) = 0
close(4) = 0
read(3, "", 4096) = 0
close(3) = 0
read(0,
*******************************************