how to restart IIS using perl in windows?

[pmohan]

trying to restart IIS usiing per. Works fine through the command prompt but not through the browser .....

#!/usr/bin/perl
#!/usr/local/bin/perl
package IIS;
$Servers='C:\Inetpub\wwwroot\Prabu\output.txt';
open (SERVERS,"<$Servers")||die "file not opened\n";
while (<SERVERS>)
{
    chomp();
#    print "  <tr>\n";
#$ServerIP = "$_";
#$log=$ARGV[0];
#print"$log";
#print"$ServerIP\n</td>";
system(" C:\\Inetpub\\wwwroot\\Prabu\\Rub.Bat");
    sleep 5;
    print "Done";
    }
 

[jonathan184]

how are you calling it through the browser?