in reply to How do I tell perl to excute a windows from a specif folder

Tip #1 from the Basic debugging checklist: warnings

Unrecognized escape \s passed through at line ...

Maybe try \\TSM\\server

Also, you first specify a full path to dsmadmc, then later you don't specify a path.