Stop Window Services with Perl Script

Hello All
I am getting an issue which I want to share will all you guys
There is one windiows sercice running on my machine names Network Provisioning Service.

I developed the perl script which do

$service='Network Provisioning Service';
system('net stop $service');

When I manually stop it works fine, but with the perl script it gives the following error

System error 1060 has occurred.
The specified service does not exist as an installed service.

Can anyone please help me about this, how to resolve this

Regards
Adi

You are running net stop $service , not net stop Network Provisioning Service because variables do not expand inside single quotes ' ', try double quotes " ".