#!/usr/bin/perl  

use Win32::OLE::Variant;

$userObject = Win32::OLE->GetObject("LDAP://CN=<cn>,OU=<ou>,DC=bateman,DC=co, DC=il");
$data1 = $userObject->{lastlogoff};

print $data1;