Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    my $ua = LWP::UserAgent->new;
    my $res = $ua->get ('https://www.perlmonks.org/?node_id=11133845');
    is $res->header ('server'), 'Apache';