Select Code to Download

sub AUTOLOAD : lvalue {
    (!ref ${$AUTOLOAD}) ? ${$AUTOLOAD} 
...
                                        : (ref ${$AUTOLOAD} eq 'ARRAY'
+) ? @{${$AUTOLOAD}}
                                                                      
+  : %{${$AUTOLOAD}};
}

#include AUTOLOAD from above . . .

&foo = ['a', 'b', 'c'];
print &foo->[0];