Wu-Wu

#
# dnssio (demo)
#
tango_enable="NO"
tango_appfile="/usr/zyxmasta/hosting/nse-demo/app.psgi"
tango_owner="nsmasta"
tango_group="nsmasta"
tango_listen="--listen :3050"
tango_flags="--workers 2 --error-log /usr/zyxmasta/hosting/nse-demo/logs/instance.log"
tango_pidfile="/var/run/tango.pid"

Wu-Wu

#!/bin/sh
#
# PROVIDE: psgiapp
# REQUIRE: NETWORKING
# KEYWORD:  shutdown

. /etc/rc.subr

case "$0" in
/etc/rc*)

Wu-Wu

#!/usr/bin/env perl

use Test::Spec;

{
    package Foo::Bar;

    use LWP::UserAgent;

    sub new {

Wu-Wu

#
# application entry points
#   https://www.example.com/ (production)
#   https://demo.example.com/ (demo/lite production)
#   https://devel.example.com/ (development)
#
# static content served by nginx server
#   http://app-be1.example.net:4xxx/
#   http://app-be2.example.net:4xxx/
#

Wu-Wu

#
# Dancer::Session::Redis
# Dancer::Serializer::JSON
#
use strict;
use warnings;
use Dancer;

# set up session
set redis_session => {

Wu-Wu

#!/bin/sh

PKGS=`pkg_info | grep ^p5- | awk '{print $1}'`

for pkg in $PKGS;
do
    echo "Package ${pkg}"
    echo "------------------------------------------------------"
    echo "Required by:"
    pkg_info -R $pkg | grep -v Information | grep -v Required | grep -v "^$"