# This following code shares the D:\MyShare directory
%share_def = (
   'maxusers'    => -1,
   'netname'     => 'MyShare',
   'passwd'      => "",
   'path'        => 'd:/MyShare',
   'permissions' => 0,
   'remark'      => 'This is MyShare',
   'type'        => 0x00,  # directory
);

$status = Win32::NetResource::NetShareAdd(\%share_def, $parm_error);