Select Code to Download

#!/usr/bin/perl -w
use strict;
...
h1h
i1i
j1j

b1b
e1e
f1f
i1i
j1j

 perl -ne 'exists $x{$_}?delete $x{$_}:$x{$_}++;}{print for sort keys 
+%x;' < input.txt > output.txt