summaryrefslogtreecommitdiffstats
path: root/contrib/urlize.pl
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/urlize.pl')
-rw-r--r--contrib/urlize.pl29
1 files changed, 0 insertions, 29 deletions
diff --git a/contrib/urlize.pl b/contrib/urlize.pl
deleted file mode 100644
index 5acb52de..00000000
--- a/contrib/urlize.pl
+++ /dev/null
@@ -1,29 +0,0 @@
1#!/usr/bin/perl
2#
3# urlize.pl
4# jcw, 5/12/00
5#
6# A wrapper around Nagios plugins that provides a URL link in the output
7#
8#
9# Pay close attention to quoting to ensure that the shell passes the
10# expected data to the plugin. For example, in:
11#
12# urlize http://example.com/ check_http -H example.com -r 'two words'
13#
14# the shell will remove the single quotes and urlize will see:
15#
16# urlize http://example.com/ check_http -H example.com -r two words
17#
18# You probably want:
19#
20# urlize http://example.com/ \"check_http -H example.com -r 'two words'\"
21#
22($#ARGV < 1) && die "Incorrect arguments";
23my $url = shift;
24
25chomp ($result = `@ARGV`);
26print "<A HREF=\"$url\">$result</A>\n";
27
28# exit with same exit value as the child produced
29exit ($? >> 8);