perl -we 'use new qw(My::Very::Long::Module x foo 42); print $x->get_foo;'