use strict; use warnings; use HTML::TreeBuilder; use HTTP::Tiny; use Data::Dumper qw(Dumper); use IO::Socket::SSL; my $link = 'https://www.tudogostoso.com.br/receita/199993-bolo-de-limao.html'; my $response = HTTP::Tiny->new->get($link); my $html; print "$response->{status}\t$response->{reason}\n"; print $response->{content}; if ($response->{success}) { $html = $response->{content}; print "entrou\n"; } #### 403 Forbidden You have been blocked

Please enable JS and disable any ad blocker