my $smb = new Filesys::SmbClientParser (undef, 
					("user" => $winuser,
					 "password" => $winpassword,
					 "Debug" => "1"
					)
				       );

$smb->Host($winserver);

$smb->Share($winshare);

$smb->get($winlogname, "/tmp/win.log") or die("THERE WAS AN ERROR SMBERR: " . $smb->err);

print "Winlog now at /tmp/win.log\n";