# Debug / Logging
our $debug = 1;
use CGI::Carp qw(name=XXX);
local $SIG{__WARN__} = \&Carp::cluck;

# Begin
use strict;
use warnings;
use diagnostics;
...