use strict;
use warnings;

use obj;

my $o = obj->new();
$o->run();