#!/usr/bin/perl -w

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

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

my $r = Apache->request;
my $constuctor = iXML::TheConstruct->new();