Select Code to Download

use strict;
use warnings;
...
a.c='abc'
d='def'
a.e='ghi'

$VAR1 = \{
            'a' => {
...
                   },
            'd' => 'def'
          };