5 lines
No EOL
122 B
Perl
5 lines
No EOL
122 B
Perl
use HTTP::Tiny;
|
|
|
|
my $response = HTTP::Tiny->new->get('http://example.com/');
|
|
|
|
die "Failed!\n" unless $response->{success}; |