my %sq_ds_uniq; for my $key (keys %sq_ds) { for my $key_uniq (keys %sq_ds_uniq) { ### This line is metacode last if $sq_ds{$key}{query} is like $sq_ds_uniq{$key_uniq}{query}; } $sq_ds_uniq{$key} = $sq_ds{$key}; } #### '11102' => { 'user' => 'sql_user', 'rows_sent' => '0', 'rows_exam' => '32348', 'query_time' => '55', 'log_time' => '13:11:13', 'query' => 'select something from somewhere', },