Perl code - 3 lines

Link:

Perl, pasted on Jan 6:

1
2
3

use Data::Dumper;

$foo{log} = 1; print Dumper(\%foo)

Output:

1
2
3

$VAR1 = {
          'log' => 1
        };