Hi, this is probably somewhere in the docs, but I can't find it... Would some kind sould please advise me, how to print the hostname and the called script in the error message below?
# Extract port, user, default database from PATH_INFO $port = $1 if $r->path_info() =~ /\/port=(\d+)/i; $owner = $1 if $r->path_info() =~ /\/owner=(\w+)/i; $dbase = $1 if $r->path_info() =~ /\/dbase=(bo_\w+)/i; $task = $1 if $r->path_info() =~ /\/task=task(\d+)/i; unless ($port and $owner and $dbase and $task) { printf "<H2>Error: This script should be called as http://%s/taskit/port=1234/owner=afarber/dbase=bo_test/task=task123</H2>", $r->server->server_hostname(); $r->log_error('PATH_INFO unset or wrong: ' . $r->path_info()); goto END; } Thanks Alex -- Report problems: http://perl.apache.org/bugs/ Mail list info: http://perl.apache.org/maillist/modperl.html List etiquette: http://perl.apache.org/maillist/email-etiquette.html