perl -e'use lib qw( . ); do "something.cgi"; something->run()'

##</code><code>##

perl -I. something.cgi