$op_map->{'camel'}=sub{print "$one is a $two with humps.\n"};