my $ref;

##</code><code>##

$ref->{key};
%$ref->{key};
%{$ref}->{key};
$$ref{$key};

##</code><code>##

$ref->[0];
@$ref->[0];
@{$ref}->[0];
$$ref[0];

##</code><code>##

$$ref = 1;
$$ref;

##</code><code>##

my $ref = POLYMORPH->new( qw( key in some init values) );
$ref->{key};  # might return 'in'
$ref->[0];    # might return 'key'
$ref;         # depends on implementation

##</code><code>##

  How can I make a single reference that can be 
  LEGALLY DEREFERENCED as a hash ref, array ref, 
  AND a scalar ref, with the resulting operation 
  tied to a class implementation?