Help for this page

Select Code to Download


  1. or download this
    foreach my $item (in $Inbox->{Items})
    
    ...
    print "subject    : ", $item->{Subject}, "\n",
    print "Sent by    : ", $item->{SenderName}, "\n";
    print "Received at: ", $item->{ReceivedTime}, " \n";
    
  2. or download this
    Received at: Win32::OLE::Variant=SCALAR(0x1cb00cc)