Select Code to Download

use strict;
use warnings;
...

print Dumper $result;
print Dumper $result2;

$VAR1 = {
          'binding' => {
...
                     }
        };