my %data;
while(my $msg = get_msg()) {
    $data{$msg} = 1;
}