Select Code to Download

$rec{NOTE}{Nested}

$rec{NOTE}->{Nested}

( $rec{NOTE} //= {} )->{Nested}

use strict;
use warnings;
...
printf "exists:  %s\n", exists($rec{NOTE})  ?1:0; 
printf "defined: %s\n", defined($rec{NOTE}) ?1:0;
printf "true:    %s\n", $rec{NOTE}          ?1:0;

exists:  0
defined: 0
...
exists:  1
defined: 1
true:    1