my $d = HTTP::DAV->new();
$d->credentials( -url=>"http://host",
                  -user=> 'user',
                  -pass=> $password) or die $d->message;

$d->open("http://host/exchange/user/Inbox/")
  or die $d->message;
my $r = $d->propfind('http://host/exchange/user/blah.EML', 0);
my $long_ls = $r->get_property('long_ls');