Select Code to Download

my $foo;
my $ok= eval {
...

# Now we have the decoded data structure in $foo
warn Dumper $foo;