sub method { print "\@_ is: @_\n" }
*foo = bless [ 'Array' ], 'main';
(\@foo)->method("It's an object now");