diff options
Diffstat (limited to 'plugins-scripts')
| -rw-r--r-- | plugins-scripts/utils.pm.in | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/plugins-scripts/utils.pm.in b/plugins-scripts/utils.pm.in index 028241d4..d4dddae9 100644 --- a/plugins-scripts/utils.pm.in +++ b/plugins-scripts/utils.pm.in | |||
| @@ -2,6 +2,9 @@ | |||
| 2 | # $Id$ | 2 | # $Id$ |
| 3 | # | 3 | # |
| 4 | # $Log$ | 4 | # $Log$ |
| 5 | # Revision 1.9 2006/10/19 18:44:53 tonvoon | ||
| 6 | # Allow hostnames beginning with digits (O'Shaughnessy Evans - 1567390) | ||
| 7 | # | ||
| 5 | # Revision 1.8 2006/06/07 14:23:12 seanius | 8 | # Revision 1.8 2006/06/07 14:23:12 seanius |
| 6 | # removed stale references to PATH_TO_NTPFOO, as it's no longer used. | 9 | # removed stale references to PATH_TO_NTPFOO, as it's no longer used. |
| 7 | # | 10 | # |
| @@ -73,7 +76,7 @@ sub usage { | |||
| 73 | 76 | ||
| 74 | sub is_hostname { | 77 | sub is_hostname { |
| 75 | my $host1 = shift; | 78 | my $host1 = shift; |
| 76 | if ($host1 && $host1 =~ m/^([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+|[a-zA-Z][-a-zA-Z0-9]+(\.[a-zA-Z][-a-zA-Z0-9]+)*)$/) { | 79 | if ($host1 && $host1 =~ m/^([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+|[a-zA-Z0-9]+(\.[a-zA-Z0-9]+)*)$/) { |
| 77 | return 1; | 80 | return 1; |
| 78 | }else{ | 81 | }else{ |
| 79 | return 0; | 82 | return 0; |
