found it:
$exitWndwEx = new Win32::API('user32', 'ExitWindowsEx', [N,N], N) or die print "User api failed: $!";
if(not defined $exitWndwEx )
{
die "Can't import API User: $!\n";
}
$exitWndwEx ->Call(0,0) or die print "Logout Call failed: $!";
StevoIE