http://www.perlmonks.org?node_id=170028


in reply to Test Availability of HTTPS Web Application?

++Kanji for LWP::UserAgent example. But Perl is TMTOWTDI. Here example which does similar thing via HTTP::WebTest.

#!/usr/bin/perl -w use strict; use HTTP::WebTest; my $url = shift; my $wt = HTTP::WebTest->new; # runs test and generates test report $wt->run_tests([ { url => $url } ]);

Note that you still have to install Crypt::SSL to get 'https' to work.

--
Ilya Martynov (http://martynov.org/)