$rueck = `net use P: \\\\xxxx\\xxxx xxxx /user:xxxx /persistent:no 2>&1`;
print Win32::FormatMessage($rueck);