$ perl -MO=Deparse,-p  -e " ok +Some::Package::Foo->a_method_call($var), 'test succeeded'; "
(('ok' + 'Some::Package::Foo'->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

##</code><code>##

$ 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