#!/usr/bin/perl
use strict;
my $class;
BEGIN {
$class = $ENV{MODULE_START_CLASS} || 'Module::Start';
eval "use $class"; die $@ if $@;
}
$class->new->run(@ARGV);