perl -MData::Dump -E 'package Foo; use overload q{~~} => sub { return (111, 222, 333) };  $o = bless {}; Data::Dump::dump($o ~~ "whatever"); say "But I want: 111, 222, 333"'