path: swi-prolog_9.2.9+dfsg-1.1/packages/http/examples/linux-init-script
if [ ! -z "$PIDFILE" ]; then DAEMONARGS="$DAEMONARGS --pidfile=$PIDFILE"; fi
pidofserver()
{ if [ -f "$PIDFILE" ]; then
    cat "$PIDFILE"