perl -MLWP::UserAgent -E 'say "OK" if LWP::UserAgent->new->get("https://www.cnn.com")->is_success'
OK