consulta sobre whois
Publicado por Alfredo Feijoo (1 intervención) el 24/10/2002 21:24:19
Existe algun cgi con el que pueda poner en mi web un caja de busqueda de dominios libres?
Valora esta pregunta
0
Página HTML (busqueda_dominios.html)
<!DOCTYPE html>
<html>
<head>
<title>Búsqueda de Dominios</title>
</head>
<body>
<h1>Búsqueda de Dominios Libres</h1>
<form action="resultados_busqueda.cgi" method="get">
<label for="dominio">Ingresa el dominio deseado:</label>
<input type="text" name="dominio" required>
<input type="submit" value="Buscar">
</form>
</body>
</html>
#!/usr/bin/perl
use strict;
use warnings;
use CGI;
use LWP::Simple; # Módulo para hacer solicitudes HTTP
my $cgi = CGI->new;
print $cgi->header(-type => 'text/html');
my $dominio = $cgi->param('dominio');
# Realiza la búsqueda utilizando la API o el servicio de tu elección
my $url = "https://ejemplo.com/busqueda-dominios?dominio=$dominio";
my $resultado = get($url);
print "<h1>Resultados de la Búsqueda para '$dominio':</h1>";
print "<pre>$resultado</pre>";