Rev 17 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 17 | Rev 68 | ||
---|---|---|---|
Line 2... | Line 2... | ||
2 | 2 | ||
3 | # |
3 | # |
4 | # VGWhoIs (ViaThinkSoft Global WhoIs, a fork of generic Whois / gwhois) |
4 | # VGWhoIs (ViaThinkSoft Global WhoIs, a fork of generic Whois / gwhois) |
5 | # Main program |
5 | # Main program |
6 | # |
6 | # |
7 | # (c) 2010-2019 by Daniel Marschall, ViaThinkSoft <info@daniel-marschall.de> |
7 | # (c) 2010-2021 by Daniel Marschall, ViaThinkSoft <info@daniel-marschall.de> |
8 | # based on the code (c) 1998-2010 by Juliane Holzt <debian@kju.de> |
8 | # based on the code (c) 1998-2010 by Juliane Holzt <debian@kju.de> |
9 | # Some early parts by Lutz Donnerhacke <Lutz.Donnerhacke@Jena.Thur.de> |
9 | # Some early parts by Lutz Donnerhacke <Lutz.Donnerhacke@Jena.Thur.de> |
10 | # |
10 | # |
11 | # License: https://www.gnu.org/licenses/gpl-2.0.html (GPL version 2) |
11 | # License: https://www.gnu.org/licenses/gpl-2.0.html (GPL version 2) |
12 | # |
12 | # |
Line 255... | Line 255... | ||
255 | # No Handle No* Maybe |
255 | # No Handle No* Maybe |
256 | # ------------------------------------------------ |
256 | # ------------------------------------------------ |
257 | # * = but it is unlikely that a handle contains non-latin characters |
257 | # * = but it is unlikely that a handle contains non-latin characters |
258 | 258 | ||
259 | # Filtering |
259 | # Filtering |
- | 260 | no warnings 'utf8'; # TODO: We get the error "Malformed UTF-8 character: xc2x5d" if we search for "oid:2.999" |
|
260 | $query =~ y/[\x{00A0}-\x{FFFF}]a-zA-Z0-9:.,+_ -//cd; |
261 | $query =~ y/[\x{00A0}-\x{FFFF}]a-zA-Z0-9:.,+_ -//cd; |
261 | $query =~ s/\.$//; |
262 | $query =~ s/\.$//; |
262 | my $query_utf8_filtered = VGWhoIs::Utils::enforce_utf8($query); |
263 | my $query_utf8_filtered = VGWhoIs::Utils::enforce_utf8($query); |
263 | if ( $query_utf8 ne $query_utf8_filtered ) { |
264 | if ( $query_utf8 ne $query_utf8_filtered ) { |
264 | # QUE: warn or print? |
265 | # QUE: warn or print? |