Hi
forgive me, but I have no idea what is wrong with this piece of code for
analyzing db.counter file


#!/usr/bin/perl
use NDBM_File;
tie  %counter,"NDBM_File",
"/home/plachnina/freeradius/ownprograms/db.counter",O
_RDWR,0777
        or die "Can't read file: $!\n";

while (($value,$key) =each %counter)
{
        print $value, ' = ',$key, "\n";
}
untie %counter;

and now:

[plachnina@alt ownprograms]$ ls -l
total 32
-rw-rw-rw-    1 plachnin users       12288 Dec 20 08:26 aliases.db
-rw-rw-rw-    1 plachnin users       12312 Dec 20 08:13 db.counter
-rwxr-xr-x    1 plachnin users         257 Dec 20 08:35 freestatlog.prl
[plachnina@alt ownprograms]$ ./freestatlog.prl
Can't read file: No such file or directory
[plachnina@alt ownprograms]$


could anyone explain me, what's going on?

regards

Mariusz Bozewicz


- 
List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html

Reply via email to