perl -Mojo -e " print g(q{http://user:pass@10.0.0.1/get_first})->to_string "