That's not the way to use a tied hash at all.

tie my %tied, 'NewHash';
$tied{ num } = 12;
print $tied{ num }, "\n";
[download]

You need to read the perltie docs.