impersonating with Perl

[Soeren Gemuth]

I want to make an impersonating. ( LogonAsUser)
But i do not want to use AdminMisc.

Do anyone know an alternative one Solution ???