Select Code to Download

# perl -slw
use strict;
...
key5=value5    ;Comment2

[Section3]

$VAR1 = {
    'Section1' => {
...
        'key4' => [ 'value4', undef ]
    }
};