In this case both $n and $m contain hash reference but in %{$data->{$m}} $m should be a key.

Try to run your script in perl debugger (perldebug) and check $n and $m using 'x' command for better understanding.