chomp $text;
unpad($text);
$text = substr($text, 0, $duplth) if length $text > $duplth;
my $dupkey = "$call|$to|$text";
return 1 if exists $dup{$dupkey};
chomp $text;
unpad($text);
$text = substr($text, 0, $duplth) if length $text > $duplth;
my $dupkey = "$call|$to|$text";
return 1 if exists $dup{$dupkey};