Select Code to Download

use strict;
use warnings;
...

my $iv = eval "$i";
print Dumper $iv;

$VAR1 = [
          [
...
            'etc'
          ]
        ];