#!/usr/bin/perl -w

# First, do the usual dance of the stricture
#---AUTOPRAGMASTART---
use 5.012;
use strict;
use warnings;
use English qw( -no_match_vars );
use Carp;
#---AUTOPRAGMAEND---

# Immediately after that, see of we need to spice
# up @INC
BEGIN {

    if($ARGV[1] eq "--debug") {
        print("Development INC activated\n\n");
        unshift @INC, "/home/cavac/src/maplat_prodit/lib";
        unshift @INC, "/home/cavac/src/maplat_framework/lib";
    }
}

# Only after that, "use" the modules that could be in our debug path
use Maplat::Web;
use Maplat::Web::ProdIT;
use XML::Simple;