Select Code to Download

a b c   e h j   l m n p
  b c d e f j k l m r s t

 [ 
   [ [ '-', 0, 'a'  ] ],

...
     [ '+', 11, 't' ],
   ]
]

# Suppose @i1 and @i2 contain the slurped contents
# of two input files.
foreach my $hunk (Algorithm::Diff::diff(\@i1, \@i2))
...
            $element->[2];
    }
}