I'm trying to get a Nagios plugin to work, but my Perl fu has failed me. It gives me "Invalid URL:" and what I typed in, even though I thought I was typing a semi-valid sip URL:
my $url = $1 if ($opt_U =~
m/^(sip:[a-zA-Z0-9_\+\*#]+\@[a-zA-Z0-9\.]+)$/);
($url) || usage("Invalid URL: $opt_U\n");
I'm not sure how the line continuation is supposed to work-- shouldn't the first two lines be joined? But I tried that and it reacts the same way.
Someone sell me a clue?
-T