Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...

my $response= $ua->get("https://$server:$port/");
print $response->as_string;
  2. or download this
    DEBUG: .../IO/Socket/SSL.pm:1653: new ctx 39194656
DEBUG: .../IO/Socket/SSL.pm:363: socket not yet connected
...
Client-Warning: Internal response

Can't connect to 192.168.100.222:443