[rlug] Re: counter

[arny]

> > vaut si eu de ceva timp un counter ptr o pagina web ... are cineva vreo
> > idee unde as putea gasi??
  so .. am gasit un script ceva de genu :
#!/usr/bin/perl
#################################################
#Simple Counter     #
#      #
#Script Copyright 1999-2000 CrashInto.com #
#################################################

##Define Variables

$datadir = "/path/to/data/directory";


#################################################
#      #
# There Is No need to edit Below this line!!!!! #
#      #
#################################################
&add_hit;
&display;
######################
sub add_hit {
 open(NUMBER,"$datadir/count.txt");
     $num = <NUMBER>;
    close(NUMBER);

       $num++;

    open(NUM,">$datadir/count.txt") || die $!;
     print NUM "$num";
    close(NUM);
}

sub display {
  print "Content-type: text/html\n\n";
 open(NUMBER,"$datadir/count.txt");
     $num = <NUMBER>;
    close(NUMBER);
 print "$num\n";
}

 .. asa iam facut modificarile de rigoare dar nu vrea sa imi execute scriptu
. ceva idei ?

---
Send e-mail to '[EMAIL PROTECTED]' with 'unsubscribe rlug' to 
unsubscribe from this list.