Konwertuj curl na Perl

Q: Czym jest Perl LWP?

LWP (Library for WWW in Perl) to standardowa biblioteka klienta HTTP dla Perla. Moduł LWP::UserAgent zapewnia w pełni funkcjonalnego klienta z obsługą plików cookie, przekierowań, proxy i SSL. Zainstaluj za pomocą cpan LWP lub apt install libwww-perl. curl2code używa LWP jako domyślnego dla konwersji Perl.

Q: LWP vs HTTP::Tiny vs Mojo::UserAgent — którego użyć?

LWP jest bogaty w funkcje i jest tradycyjnym wyborem. HTTP::Tiny to moduł rdzenia (nie wymaga instalacji) — świetny do prostych żądań. Mojo::UserAgent jest nowoczesny, wspiera asynchroniczność i WebSocket. Dla szybkich skryptów użyj HTTP::Tiny. Dla pełnej funkcjonalności użyj LWP. Podobne języki skryptowe znajdziesz w curl na Python lub curl na Ruby.

Q: Jak obsługiwać uwierzytelnianie w Perlu?

Z LWP: $ua->default_header('Authorization' => 'Bearer token'). Dla uwierzytelniania Basic: $ua->credentials('host:port', 'realm', 'user', 'pass'). Możesz też ustawić nagłówki na żądanie w obiekcie HTTP::Request. curl2code konwertuje flagi -u i -H 'Authorization' na składnię Perla.

Q: Jak wysyłać dane formularza multipart w Perlu?

Użyj HTTP::Request::Common: POST($url, Content_Type => 'form-data', Content => [file => ['path/file.pdf']]). LWP automatycznie obsługuje granice multipart. Dla dodatkowych pól dodaj pary klucz-wartość do tablicy Content. curl2code konwertuje flagi -F na ten format.

Q: Jak obsługiwać błędy HTTP w Perlu?

Sprawdź $response->is_success po każdym żądaniu. Szczegóły błędu: $response->status_line zwraca kod statusu i komunikat. LWP zwraca obiekt odpowiedzi nawet przy błędach — sprawdź $response->code dla statusu HTTP. Użyj die lub warn do raportowania błędów.

Q: Jak parsować JSON w Perlu?

Użyj modułu JSON: my $data = decode_json($response->content). Do kodowania: my $json = encode_json($hashref). Zainstaluj przez cpan JSON. Dla Perla 5.14+ rozważ JSON::PP (moduł rdzenia). Narzędzia zorientowane na JSON znajdziesz w curl na Go.

Q: Jak ustawić limity czasu w Perl LWP?

Ustaw w UserAgent: my $ua = LWP::UserAgent->new(timeout => 30). Ustawia to ogólny limit czasu żądania w sekundach. Dla limitu czasu połączenia użyj opcji IO::Socket::SSL. Ponowienia w LWP nie są wbudowane — zaimplementuj je ręcznie lub użyj LWP::UserAgent::Determined.

Q: Jak używać proxy w Perlu?

Ustaw w UserAgent: $ua->proxy(['http', 'https'], 'http://proxy:8080'). Lub użyj zmiennych środowiskowych: $ua->env_proxy odczytuje HTTP_PROXY i HTTPS_PROXY. Dla wyjątków no-proxy: $ua->no_proxy('localhost', '.internal'). curl2code konwertuje flagi -x na wywołania proxy LWP.

Q: Jak wysłać żądanie POST z ciałem JSON w języku Perl?

Konwertuj polecenie curl POST, takie jak curl -X POST -H "Content-Type: application/json" -d '{"key":"value"}' URL na kod Perl za pomocą curl2code. Wygenerowany kod używa $ua->post($url, Content_Type => 'application/json', Content => encode_json($data)). curl2code automatycznie wykrywa flagi -d/--data z zawartością JSON i ustawia odpowiedni nagłówek Content-Type w kodzie LWP::UserAgent.

Q: Jak dodać autoryzację Bearer token w języku Perl?

Przekaż curl -H "Authorization: Bearer YOUR_TOKEN" URL do curl2code, a narzędzie wygeneruje kod LWP::UserAgent z nagłówkiem autoryzacji: $req->header('Authorization' => 'Bearer YOUR_TOKEN'). curl2code wykrywa tokeny Bearer zarówno z flag -H "Authorization: Bearer ...", jak i --oauth2-bearer. W przypadku Basic auth użyj -u user:pass.

Konwertuj polecenia curl na kod Perl przy użyciu LWP::UserAgent. curl2code działa w całości w przeglądarce poprzez WebAssembly — Twoje dane pozostają prywatne. Do programowania w Python wypróbuj nasz konwerter curl na Python. W przypadku Ruby, zobacz curl na Ruby. Poniżej znajdują się gotowe do użycia przykłady w Perl.

Jak skopiować polecenie curl z przeglądarki

1
Otwórz DevTools
Naciśnij F12 lub Ctrl+Shift+I, aby otworzyć narzędzia programistyczne przeglądarki.
2
Przejdź do karty Sieć
Kliknij kartę Sieć i wykonaj akcję, która wywołuje żądanie HTTP.
3
Kopiuj jako cURL
Kliknij żądanie prawym przyciskiem myszy → Kopiuj → Kopiuj jako cURL. Następnie wklej je powyżej.

Przykłady kodu w Perl

1Proste żądanie GET

polecenie curl

curl https://api.example.com/users

Perl · LWP

use LWP::Simple;
$content = get('https://api.example.com/users');

2POST z treścią JSON

polecenie curl

curl -X POST https://api.example.com/users \
  -H "Content-Type: application/json" \
  -d '{"name":"John","email":"john@example.com"}'

Perl · LWP

use LWP::UserAgent;

$ua = LWP::UserAgent->new();
$response = $ua->post(
    'https://api.example.com/users',
    'Content-Type' => 'application/json',
    Content => '{"name":"John","email":"john@example.com"}'
);

3Żądanie z tokenem Bearer

polecenie curl

curl https://api.example.com/me \
  -H "Authorization: Bearer token123"

Perl · LWP

use LWP::UserAgent;

$ua = LWP::UserAgent->new();
$response = $ua->get(
    'https://api.example.com/me',
    Authorization => 'Bearer token123'
);

4Przesyłanie formularza Multipart

polecenie curl

curl -X POST https://api.example.com/upload \
  -F "file=@document.pdf" \
  -F "description=My file"

Perl · LWP

use LWP::UserAgent;

$ua = LWP::UserAgent->new();
$response = $ua->post(
    'https://api.example.com/upload',
    Content_Type => 'form-data',
    Content => [
        file => ['document.pdf'],
        description => 'My file'
    ]
);

5Niestandardowe nagłówki

polecenie curl

curl https://api.example.com/data \
  -H "X-API-Key: abc123" \
  -H "Accept: application/json" \
  -H "X-Request-ID: req-456"

Perl · LWP

use LWP::UserAgent;

$ua = LWP::UserAgent->new();
$response = $ua->get(
    'https://api.example.com/data',
    'X-API-Key' => 'abc123',
    Accept => 'application/json',
    'X-Request-ID' => 'req-456'
);

Najczęściej zadawane pytania

Czym jest Perl LWP?

LWP (Library for WWW in Perl) to standardowa biblioteka klienta HTTP dla Perla. Moduł LWP::UserAgent zapewnia w pełni funkcjonalnego klienta z obsługą plików cookie, przekierowań, proxy i SSL. Zainstaluj za pomocą cpan LWP lub apt install libwww-perl. curl2code używa LWP jako domyślnego dla konwersji Perl.

LWP vs HTTP::Tiny vs Mojo::UserAgent — którego użyć?

LWP jest bogaty w funkcje i jest tradycyjnym wyborem. HTTP::Tiny to moduł rdzenia (nie wymaga instalacji) — świetny do prostych żądań. Mojo::UserAgent jest nowoczesny, wspiera asynchroniczność i WebSocket. Dla szybkich skryptów użyj HTTP::Tiny. Dla pełnej funkcjonalności użyj LWP. Podobne języki skryptowe znajdziesz w curl na Python lub curl na Ruby.

Jak obsługiwać uwierzytelnianie w Perlu?

Z LWP: $ua->default_header('Authorization' => 'Bearer token'). Dla uwierzytelniania Basic: $ua->credentials('host:port', 'realm', 'user', 'pass'). Możesz też ustawić nagłówki na żądanie w obiekcie HTTP::Request. curl2code konwertuje flagi -u i -H 'Authorization' na składnię Perla.

Jak wysyłać dane formularza multipart w Perlu?

Użyj HTTP::Request::Common: POST($url, Content_Type => 'form-data', Content => [file => ['path/file.pdf']]). LWP automatycznie obsługuje granice multipart. Dla dodatkowych pól dodaj pary klucz-wartość do tablicy Content. curl2code konwertuje flagi -F na ten format.

Jak obsługiwać błędy HTTP w Perlu?

Sprawdź $response->is_success po każdym żądaniu. Szczegóły błędu: $response->status_line zwraca kod statusu i komunikat. LWP zwraca obiekt odpowiedzi nawet przy błędach — sprawdź $response->code dla statusu HTTP. Użyj die lub warn do raportowania błędów.

Jak parsować JSON w Perlu?

Użyj modułu JSON: my $data = decode_json($response->content). Do kodowania: my $json = encode_json($hashref). Zainstaluj przez cpan JSON. Dla Perla 5.14+ rozważ JSON::PP (moduł rdzenia). Narzędzia zorientowane na JSON znajdziesz w curl na Go.

Jak ustawić limity czasu w Perl LWP?

Ustaw w UserAgent: my $ua = LWP::UserAgent->new(timeout => 30). Ustawia to ogólny limit czasu żądania w sekundach. Dla limitu czasu połączenia użyj opcji IO::Socket::SSL. Ponowienia w LWP nie są wbudowane — zaimplementuj je ręcznie lub użyj LWP::UserAgent::Determined.

Jak używać proxy w Perlu?

Ustaw w UserAgent: $ua->proxy(['http', 'https'], 'http://proxy:8080'). Lub użyj zmiennych środowiskowych: $ua->env_proxy odczytuje HTTP_PROXY i HTTPS_PROXY. Dla wyjątków no-proxy: $ua->no_proxy('localhost', '.internal'). curl2code konwertuje flagi -x na wywołania proxy LWP.

Jak wysłać żądanie POST z ciałem JSON w języku Perl?

Konwertuj polecenie curl POST, takie jak curl -X POST -H "Content-Type: application/json" -d '{"key":"value"}' URL na kod Perl za pomocą curl2code. Wygenerowany kod używa $ua->post($url, Content_Type => 'application/json', Content => encode_json($data)). curl2code automatycznie wykrywa flagi -d/--data z zawartością JSON i ustawia odpowiedni nagłówek Content-Type w kodzie LWP::UserAgent.

Jak dodać autoryzację Bearer token w języku Perl?

Przekaż curl -H "Authorization: Bearer YOUR_TOKEN" URL do curl2code, a narzędzie wygeneruje kod LWP::UserAgent z nagłówkiem autoryzacji: $req->header('Authorization' => 'Bearer YOUR_TOKEN'). curl2code wykrywa tokeny Bearer zarówno z flag -H "Authorization: Bearer ...", jak i --oauth2-bearer. W przypadku Basic auth użyj -u user:pass.

Jak ustawić nagłówek Content-Type w języku Perl?

curl2code konwertuje curl -H "Content-Type: application/json" URL na kod LWP::UserAgent z właściwym nagłówkiem: $req->header('Content-Type' => 'application/json'). Dla danych -d curl domyślnie ustawia application/x-www-form-urlencoded; dla przesyłania formularzy -F używa multipart/form-data. curl2code mapuje każde z nich na odpowiednie API LWP::UserAgent.

Przydatne linki

Dokumentacja LWP

metacpan.org

Dokumentacja biblioteki standardowej

metacpan.org

Strona podręcznika (man) curl

curl.se

Poradniki curl

Kody błędów curl

Sprawdź dowolny kod wyjścia curl — przyczyny, rozwiązania i wskazówki debugowania.

Pobieranie plików za pomocą curl

Zapisuj pliki z -o, -O, podążaj za przekierowaniami, wznawiaj pobieranie i więcej.

SSL, TLS i proxy

Konfiguracja certyfikatów, wersji TLS, proxy HTTP/SOCKS i niestandardowego DNS.

Jak skopiować polecenie curl z przeglądarki

Przykłady kodu w Perl

1Proste żądanie GET

2POST z treścią JSON

3Żądanie z tokenem Bearer

4Przesyłanie formularza Multipart

5Niestandardowe nagłówki

Najczęściej zadawane pytania

Przydatne linki

Poradniki curl

Konwertuj curl na inne języki

Przykłady kodu w Perl

1Proste żądanie GET

2POST z treścią JSON

3Żądanie z tokenem Bearer

4Przesyłanie formularza Multipart

5Niestandardowe nagłówki