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