using perlscript to test script

script just contains

delprinterconnection()
return

error is invalid parameter1!

delprinterconnection ("")
return

Does not work!!

delprinterconnection ("\\servername\sharename")
return

Works great!!