Search Exchange
Search All Sites
Nagios Live Webinars
Let our experts show you how Nagios can help your organization.Login
New ListingsDirectory Tree
check_domain.pl
Current Version
1.1
Last Release Date
2012-05-15
Compatible With
- Nagios 3.x
Owner
Website
Download URL
License
GPL
Hits
64924
Usage: $USER1$/check_domain.pl -d domainname.tld -w int -c int
Version history:
1.0: initial release
1.0a: minor regex bug fix
1.1: major regex updates
Version history:
1.0: initial release
1.0a: minor regex bug fix
1.1: major regex updates
Reviews (1)
bydshvedchenko, September 11, 2012
if ($whois =~ m/expir.*?((# dd-Mon-yy
d{2}-w{3}-(d{4}|d{2})|
#Jul 11 23:59:59 GMT 2013
w{3}sw{3}sd{2}sd{2}:d{2}:d{2}sw{3}sd{4}|
# dd Mon yyyy
d{2}sw{3}sd{4}|
# yyyy-mm-dd
d{4}-w{2}-d{2}))/xi or
$whois =~ m/status:.*OK-UNTILs((d{8}))d{6}/xi or
$whois =~ m/paid-till.*?((d{4}.d{2}.d{2}))/xi
) {
$edate = $1;
}
else {
print "Unknown - $domain expiration date not found.
";
exit 3;
}
d{2}-w{3}-(d{4}|d{2})|
#Jul 11 23:59:59 GMT 2013
w{3}sw{3}sd{2}sd{2}:d{2}:d{2}sw{3}sd{4}|
# dd Mon yyyy
d{2}sw{3}sd{4}|
# yyyy-mm-dd
d{4}-w{2}-d{2}))/xi or
$whois =~ m/status:.*OK-UNTILs((d{8}))d{6}/xi or
$whois =~ m/paid-till.*?((d{4}.d{2}.d{2}))/xi
) {
$edate = $1;
}
else {
print "Unknown - $domain expiration date not found.
";
exit 3;
}
