#!/usr/bin/perl -w

use lib '/home/iordy/perl.iordy.net';

use strict;
use iXML::TheConstruct;
use Apache::Request;

my $r = Apache->request;
my $apr = Apache::Request->new($r);

my $construct = iXML::TheConstruct->new();