What is the last updated and total number of links tags? Also, this is to Perl any word on that mod I emailed you about? Email me a response when you see this because I can't access the boards from work
Mar 30, 2006, 10:59 PM
Veteran (1352 posts)
Mar 30, 2006, 10:59 PM
Post #2 of 9
Views: 3837
I think <%date%> gets last build date, and <%total%> gets the count. In your admin somewhere is alisting of available tags.
The mod you want... The search log mod you mentioned should work, just figure out where to put the &log_it; tag (somehwere in sub search), then create the text file. If you can't get that to work, let me know.
Leonard
aka PerlFlunkie
The mod you want... The search log mod you mentioned should work, just figure out where to put the &log_it; tag (somehwere in sub search), then create the text file. If you can't get that to work, let me know.
Leonard
aka PerlFlunkie
Mar 31, 2006, 10:12 PM
Veteran (1352 posts)
Mar 31, 2006, 10:12 PM
Post #4 of 9
Views: 3829
In jump.cgi, add this:
else {
&error ("No link specified!");
}
&log_it;
# Now let's send the user to the url..
$goto ?
print "Location: $goto\n\n" :
&error ("Record not found ($in{$db_key})");
}
sub error {
# ------------------------------------------
#
print "Content-type: text/plain\n\n";
print "Error: $_[0]\n";
exit;
}
sub log_it {
open (JUMPS, ">>$jumps_file_name") or &cgierr("Error. Cannot open jumps file.");
print JUMPS $id . "|" . &get_date . "|" . &get_time . "\n";
close (JUMPS);
}
In links.cfg, at the bottom under "extra paths," add this:
$jumps_file_name = "$db_script_path/data/jumps.txt"; # PATH to jump record
You will need to create an empty text file (in the data directory), and name it jumps.txt.
Might work--- not tested.
Leonard
aka PerlFlunkie
Code:
else {
&error ("No link specified!");
}
&log_it;
# Now let's send the user to the url..
$goto ?
print "Location: $goto\n\n" :
&error ("Record not found ($in{$db_key})");
}
sub error {
# ------------------------------------------
#
print "Content-type: text/plain\n\n";
print "Error: $_[0]\n";
exit;
}
sub log_it {
open (JUMPS, ">>$jumps_file_name") or &cgierr("Error. Cannot open jumps file.");
print JUMPS $id . "|" . &get_date . "|" . &get_time . "\n";
close (JUMPS);
}
In links.cfg, at the bottom under "extra paths," add this:
Code:
$db_lib_path = $db_script_path; # PATH of library files. $jumps_file_name = "$db_script_path/data/jumps.txt"; # PATH to jump record
You will need to create an empty text file (in the data directory), and name it jumps.txt.
Might work--- not tested.
Leonard
aka PerlFlunkie
Apr 19, 2006, 5:34 PM
Veteran (1352 posts)
Apr 19, 2006, 5:34 PM
Post #8 of 9
Views: 3812
Try:
&log_it($id);
# Now let's send the user to the url..
And put ($in{$db_key}) back to $id.
Leonard
aka PerlFlunkie
&log_it($id);
# Now let's send the user to the url..
And put ($in{$db_key}) back to $id.
Leonard
aka PerlFlunkie