strange, nobody mentioned using OOP yet

  DB<147> ;{ package tst; sub a { "A" }; sub b {"B"} }

  DB<148> map { tst->$_ } 'a','b','a'
 => ("A", "B", "A")
[download]

classes and objects are essentially dispatch tables and methods are strings!

( just be careful about $_[0] :)