use strict;
use warnings;
use Array::Compare;
use Data::Dumper;

my %hash = (
	'a' => [ '1', '2' ],
	'b' => [ '2', '3' ],
	'c' => [ '1', '2' ]
);

my $comp = Array::Compare->new;

for my $key1 ( keys %hash ) {
	for my $key2 ( keys %hash ) {
		next if $key1 eq $key2 or !$hash{$key1};
		delete $hash{$key2}
		  if $comp->compare( \@{ $hash{$key1} }, \@{ $hash{$key2} } );
	}
}

print Dumper \%hash;

##</code><code>##

$VAR1 = {
          'c' => [
                   '1',
                   '2'
                 ],
          'b' => [
                   '2',
                   '3'
                 ]
        };