#!/usr/bin/perl -wT
##
##  CGI Application upload example
##
use strict;
use lib qw(.);
use UploadApp;
my $uploadapp = UploadApp->new();
$uploadapp->run();