|
Lines 37-42
sub string_negligible_p ($) {
Link Here
|
| 37 |
|| $t =~ /^\d+$/ # purely digits |
37 |
|| $t =~ /^\d+$/ # purely digits |
| 38 |
|| $t =~ /^[-\+\.,:;!\?'"%\(\)\[\]\|]+$/ # punctuation w/o context |
38 |
|| $t =~ /^[-\+\.,:;!\?'"%\(\)\[\]\|]+$/ # punctuation w/o context |
| 39 |
|| $t =~ /^[A-Za-z]$/ # single letters |
39 |
|| $t =~ /^[A-Za-z]$/ # single letters |
|
|
40 |
|| $t =~ /^(&[a-z]+;|&#\d+;|&#x[0-9a-fA-F]+;|%%|%s|\s|[[:punct:]])*$/ # html entities,placeholder,punct, ... |
| 40 |
) |
41 |
) |
| 41 |
} |
42 |
} |
| 42 |
|
43 |
|
| 43 |
- |
|
|