Curso de Raku / Programación funcional, concurrente, reactiva y web / Programación web / Establecer conexiones remotas / Exercises / Envíe y reciba
Solución: Envíe y reciba
Aquí tienes una posible solución para la tarea.
Código
my $conn = IO::Socket::INET.new(:host('example.com'), :port(80));
$conn.print("HEAD / HTTP/1.0\r\nHost: example.com\r\n\r\n");
my $response = $conn.recv;
$conn.close;
say $response.lines.first;🦋 Puedes encontrar el código fuente en el archivo send-and-receive.raku.
Salida
HTTP/1.1 200 OKComentarios
.printenvía la petición; las líneas del protocolo terminan en\r\n. Una peticiónHEADpide al servidor solo la línea de estado y las cabeceras, así que la respuesta es pequeña..recvlee la respuesta, y.lines.firsttoma su primera línea: la línea de estado de HTTP.