my $a = 1;
our $b = 2;
$a = $a->{'foo'};
$a = $b->{'foo'}->[2];
$a = @{ $a->{'foo'}->[3]->{'bar'} };
$a = %{ $b->[2]->{'foo'}->[4] };
$a = ${ $a->{'foo'}->[5]->{'bar'} };
$a = *{ $b->[$a]->{'foo'}->[5] };
$a = $$a;
$b = $$b
