use Modern::Perl;

my %seen;
say for grep { chomp; !$seen{$_}++ } <DATA>;

__DATA__
<item pr_1="a" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="b" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="c" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="a" pr_2="1" internal="co_1" pr_family="2" />
<item pr_1="b" pr_2="1" internal="co_1" pr_family="2" />
<item pr_1="c" pr_2="1" internal="co_1" pr_family="2" />
<item pr_1="a" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="b" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="c" pr_2="2" internal="co_1" pr_family="2" />

##</code><code>##

<item pr_1="a" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="b" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="c" pr_2="2" internal="co_1" pr_family="2" />
<item pr_1="a" pr_2="1" internal="co_1" pr_family="2" />
<item pr_1="b" pr_2="1" internal="co_1" pr_family="2" />
<item pr_1="c" pr_2="1" internal="co_1" pr_family="2" />