$A::{bbb} = 3;
print $A::bbb;
__END__

##</code><code>##

$A::{bbb} = 3;
$A::bbb = 4;
__END__
Modification of a read-only value attempted at - line 2.

##</code><code>##

$A::bbb = 3;
$A::{bbb} = 4;
print "$_ => $A::{$_}\n" for keys %A::;
print $A::bbb,"\n";
__END__
bbb => *main::4


##</code><code>##

$A::bbb = 3;
print $A::{bbb},"\n";
print *A::bbb{SCALAR},"\n";
print ${*A::bbb{SCALAR}},"\n";
__END__
*A::bbb
SCALAR(0xa011750)
3