my %seen_values;
my @unique_terminal_id = grep { !($seen_values{$_->[4]}++) } @temp_ope
+n_single;
my %seen_values;
my @unique_manufacturer_model = grep { !($seen_values{$_->[9]}{$_->[10
+]}++) } @unique_terminal_id;
my %seen_values;
my @unique_manufacturer_model_version = grep { !($seen_values{$_->[9]}
+{$_->[10]}{$_->[11]}++) } @unique_terminal_id;