my $printerpath="\\server\printername";
should be
my $printerpath="\\\\server\\printername";

$workstation->MapNetworkDrive("X:",\\server\path);
should be
$workstation->MapNetworkDrive("X:","\\\\server\\path");

And it would be good if you showed how to check for success.