use File::Basename;
use Module::Load;
use Cwd qw(realpath);
+use Carp;
+
+$SIG{ __DIE__ } = sub { Carp::confess( @_ ) };
my $debug = 0;
my %config = (
my $fail = 0;
my $notest = 0;
+GetOptions("d" => \$debug);
+
push(@INC, dirname(realpath($0)));
load 'libvideosite';