my $json =                # create a new scalar
               {              # and we'll make it a new hash reference containing:
                  %           # the list of key/value elements in the hash
                    $data     # in the $data hash reference
                          };