$A::bbb = 3;
delete $A::{bbb};
printf "direct=%d eval=%d\n", $A::bbb, eval q{$A::bbb};

outputs:
direct=3 eval=0