07/04/05 04:47:44
>>440
404ですが。
sub isspam{
my $txt = shift;
$txt =~/http:/ or not $txt =~ /[\x80-\xFF]/;
}
こんなんでいいんだろか。
07/04/05 04:47:44
>>440
404ですが。
sub isspam{
my $txt = shift;
$txt =~/http:/ or not $txt =~ /[\x80-\xFF]/;
}
こんなんでいいんだろか。
07/04/05 04:47:44
>>440
404ですが。
sub isspam{
my $txt = shift;
$txt =~/http:/ or not $txt =~ /[\x80-\xFF]/;
}
こんなんでいいんだろか。