$foo{ three } = $doit->(   1 );
$quux{  two } = get_that( 25 );
[download]

There. All better now :) (And (probably?) compatible with Perl 6)

I personally believe that it strongly depends on how you're interpreting "compatible:" in fact the new dereferencer is a single dot and not an arrow any more - something that as far as I'm concerned (FWIW) seems reasonable and desirable 95% of the times and will make me regret the arrow the remaining 5% - but then think of the usefulness and clarity of dereferencing the implicit topicalizer (which is $_ as usual) and how ugly that would be if an arrow were to be used instead! Oh, and again I for one cherish the arrow now used for pointy subs, but that's mainly in connection with an RPL thingie that's very personal and possibly uninteresting to annoying for others so that I'm not repeating it here once more...