Solved

# Counter in perl under NT.

Posted on 1998-01-20
203 Views
What do I have to change int this perl-script to get it to work under NT??? I have installed perl but  I don't know how to execute perlscript under nt....

#!/usr/bin/perl -w

$filename="counter.txt"; print "Content-type: text/html\n\n"; if (!open(COUNTER, "$filename"))
{
}

else
{
$count=<COUNTER>; close (COUNTER); if ($count =~ /\n$/) { chop($count);
}
}

$count++; if(!open(COUNTER, ">$filename"))
{
print "couldn't open for print\n";
}
else
{
print COUNTER "$count"; close (COUNTER); } print "$count";
0
Question by:pucko
[X]
###### Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

• Help others & share knowledge
• Earn cash & points

Accepted Solution

ihelpdesk earned 50 total points
ID: 1831846
You don't have to do anything. If you installed a webserver, just make an extension '.pl' and give it the command 'C:\path\to\perl\bin\perl.exe'. When you run the cgi then, i will work fine... It worked at my server (omniHTTPD)

0

LVL 84

Expert Comment

ID: 1831847
Well, if you want to be able to handle simultaneous hits without your
processes steping on each others counters, you may want to flock.
0

## Featured Post

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article will show, step by step, how to integrate R code into a R Sweave document
A quick Powershell script I wrote to find old program installations and check versions of a specific file across the network.
Learn the basics of strings in Python: declaration, operations, indices, and slicing. Strings are declared with quotations; for example: s = "string": Strings are immutable.: Strings may be concatenated or multiplied using the addition and multiplic…
This lesson goes over how to construct ordered and unordered lists and how to create hyperlinks.
###### Suggested Courses
Course of the Month6 days, 10 hours left to enroll