Perl-Hash nach JSON

[Fred Furunkelstein 2012]

Moin!

wenn ich dann ein

use JSON;
print encode_json %hash;

>   
> ausführe, wird mir nichts auf dem Bildschirm ausgegeben.  
>   
> Was mache ich/ verstehe ich falsch?  
  
falsche Funktion?  
  
~~~perl
#! /bin/perl  
  
$hash{'t1'}='T1';  
$hash{'t2'}='T2';  
  
$var='%hash';  
  
use JSON;  
print to_json(\%hash);  

-> {"t2":"T2","t1":"T1"}

Danke,

Bitte.

Fred