BEGIN{ print join("\n",@INC,''); } use Bender::Util::Check; my $check=new Bender::Util::Check();