Запуск служб/сервисов windows по средствам perl скрипта

Здравствуйте , подскажите , как запустить telnet сервер в службах windows , через perl скрипт , и возможно ли это вообще . Например в батнике прописывается так:

Code:

sc config tlntsvr start= auto
tlntadmn config port=23 sec=-NTLM
net start Telnet

Возможно ли такое , как-то , проделать в perl ?

 

Выполнить аналогичные команды в перл скрипте
http://perldoc.perl.org/functions/system.html

Непонятно зачем.