Hey!! It's cool!!! For my system (Windows 2kp<=>Outlook 2000, perl v5.6.1.), this script is working properly
(else to see something like this: "Win32::OLE::Variant=SCALAR(0x21d2f88)" instead of date and time) only with following subroutine:
print "$it->{ReceivedTime} $it->{Subject}\n";
#-------------------my sub-----------------------
sub time{
my $var = Variant(VT_DATE,$it->{ReceivedTime} );
my $OleObject->{value} = $var;
my $OleObject->Method($var);
}
#------------------------------------------------
my $subj = $it->{Subject};
Of course, together with: "use Win32::OLE::Variant;".
else, it's perfect! : ))
Stefan Marchitan