my $menu = decode_json( path( $jsonfile )->slurp_raw ); my $funcname = $menu->{menu}[0]{"-submenu"}[0]{"-value"}; my $funcref = $callback{$funcname}; $menu->{menu}[0]{"-submenu"}[0]{"-value"} = $funcref;