equal
deleted
inserted
replaced
88 } |
88 } |
89 |
89 |
90 sub get_stable_release($$) { |
90 sub get_stable_release($$) { |
91 my ($url, $search) = @_; |
91 my ($url, $search) = @_; |
92 my ($found, $stable_release) = undef; |
92 my ($found, $stable_release) = undef; |
|
93 my $website; |
93 my @website = (); |
94 my @website = (); |
94 |
95 |
95 push @website, split("\n", get($url)); |
96 $website = get($url); |
|
97 unless (defined $website) { |
|
98 print |
|
99 "RELEASE CRITICAL: failed to get $url\n"; |
|
100 exit $ERRORS{CRITICAL}; |
|
101 } |
|
102 |
|
103 push @website, split("\n", $website); |
96 |
104 |
97 foreach (@website) { |
105 foreach (@website) { |
98 unless ($found) { |
106 unless ($found) { |
99 /$search/ or next; |
107 /$search/ or next; |
100 $found = $_; |
108 $found = $_; |