Select Code to Download

#!/usr/bin/env perl
use strict;
...
          'hash_2' => {},
          'hash_1' => {}
        };

$VAR1 = {
          'hash_2' => {
...
                        'a' => 'a[bdy]dfjaPÑsdafÜ'
                      }
        };