$ref = *{${ $foo . '::'}{f_preferred}}{CODE};