$ perl -MO=Deparse,-p  -e " ok Some::Package::Foo->a_method_call($var), 'test succeeded'; "
('Some::Package::Foo'->ok->a_method_call($var), '???');
-e syntax OK

$ perl -MO=Deparse,-p  -MTest::More -e " ok Some::Package::Foo->a_method_call($var), 'test succeeded'; "
use Test::More;
ok('Some::Package::Foo'->a_method_call($var), 'test succeeded');
-e syntax OK