Select Code to Download

use Data::Dumper;
use Algorithm::Diff qw(diff);
...
print "@a\n";
print "@b\n";
}

$VAR1 = [
          [
...
          ]
        ];