use Win32::FileOp;

Map P => '\\\\perl\\monks', { persistent => 1 };