Столкнулся с такой штукой. Счетчик обращений на perl раболтает, закидываю его же в /cgi-bin/ с расширением cgi работать не хотит, пишет 500 Internal Server Error. Я уже все рекомендации посмотрел по этой ошибке и ни фига.
А вот листинг  counter.cgi:

#!/usr/bin/perl

$number_of_digits = "5";
$end = ".gif";
$pathtocounter = "counter.txt";
$pathtoimages = "http://localhost/icons/"; $graphics = "yes";
#=============================================================
print ("Content-Type: text/html\n\n");
open (COUNTER, "$pathtocounter");
$count = <COUNTER>;
chop ($count) if $count =~ /\n$/;
close (COUNTER);

$count += 1;

open (COUNTER, ">$pathtocounter");
print COUNTER ("$count");
close (COUNTER);

@digits = split(//, $count);

if ($number_of_digits eq "") {
        $howmany = @digits;
} else {
        $howmany = $number_of_digits;
}

$spline = '%0' . $howmany . 'd';
$count = sprintf("$spline", $count);

@digitimages = split(//, $count);

foreach $digitimage (@digitimages) {
    if ($graphics eq yes) {
        $image = "<img src=$pathtoimages"."$digitimage"."$end width=15 height=20>";
    print ("$image");
    } else {
        $plain = $digitimage;
    print ("$plain");
    }
}

exit;