• Files
• Commits
• Log
• Graph
• Stats

#!/usr/bin/env perl

use FindBin;
use lib (
    '/home/raj/perl-lib', # MooX::Types
    "$FindBin::Bin/../lib",
    "$FindBin::Bin/../../HILIS4/lib", # LLU
);
# use Devel::Confess; # to get full stacktrace instead of "eval nnn line nnn"
# use Carp::Always::Color; # probably conflicting with SQL::Abstract::Tree color,
  # gives: Deep recursion on subroutine "Carp::Always::Color::Term::_warn" 
  # at /home/raj/perl5/lib/perl5/IO/All.pm line 147
use RequestForm;
RequestForm->dance;

=begin # for use with starman:
use Plack::Middleware::ReverseProxy;
use Plack::Builder;
use Dancer2;

use FindBin;
use lib (
    '/home/raj/perl-lib', # MooX::Types
    "$FindBin::Bin/../lib",
    "$FindBin::Bin/../../HILIS4/lib", # LLU
);
use RequestForm;

builder {
    enable 'ReverseProxy'; # so original server addr. used instead of localhost
    dance;
}
=cut