I like the second rule in perlref.

Anywhere you'd put an identifier (or chain of identifiers) as part of a variable or subroutine name, you can replace the identifier with a BLOCK returning a reference of the correct type.

Sure, the result is often ugly, but there are no exceptions or special cases. What more could my poor memory want.