mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2024-11-27 00:57:50 +00:00
Code Issues Releases Activity

- Update to 0.96

Browse Source 
Changes:	http://search.cpan.org/dist/Net-Domain-ExpireDate/Changes
This commit is contained in:
Cheng-Lung Sung 2009-11-16 07:55:07 +00:00
parent 281fd54f5f
commit 705f4ce1f3
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=244323
2 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
dns/p5-Net-Domain-ExpireDate/Makefile
View File

@ -23,4 +23,7 @@ PERL_CONFIGURE= yes
MAN3= Net::Domain::ExpireDate.3
post-patch:
@${FIND} ${WRKSRC} -name "*.orig" -delete
.include <bsd.port.mk>

23
dns/p5-Net-Domain-ExpireDate/files/patch-lib-Net-Domain-ExpireDate.pm Normal file
View File

@ -0,0 +1,23 @@
--- lib/Net/Domain/ExpireDate.pm.orig 2009-11-16 00:19:34.303198027 +0900
+++ lib/Net/Domain/ExpireDate.pm 2009-11-16 00:23:56.700841208 +0900
@@ -130,6 +130,9 @@
if ($tld eq 'ru' || $tld eq 'su') {
return (dates_int_ru( $whois ));
} else { # 'com', 'net', 'org', 'biz', 'info', 'us', 'uk', 'cc'
+ if ( $tld eq 'jp' ) {
+ eval {$whois = Encode::encode('iso-2022-jp', $whois) if Encode::is_utf8($whois);};
+ }
my $expdate = $flags & FLG_EXPDATE ? expdate_int_cno( $whois ) : undef;
my $credate = $flags & FLG_CREDATE ? credate_int_cno( $whois ) : undef;
return ($credate, $expdate);
@@ -284,7 +287,9 @@
# [whois.jprs.jp] [....] 2006/12/31
} elsif ($whois =~ m|\[\x1b\x24\x42\x4d\x2d\x38\x7a\x34\x7c\x38\x42\x1b\x28\x42\]\s+(\d{4})/(\d{2})/(\d{2})|s) {
$rulenum = 7.4; $Y = $1; $m = $2; $d = $3;
- }
+ } elsif ($whois =~ m|\[\x1b\x24\x42\x3e\x75\x42\x56\x1b\x28\x42\]\s+.*\s+\((\d{4})/(\d{2})/(\d{2})|s) {
+ $rulenum = 7.5; $Y = $1; $m = $2; $d = $3;
+ }
unless ($rulenum) {
warn "Can't recognise expiration date format: $whois\n";