• Publicidad

Ejecutar scripts de Perl desde una página web

Todo lo relacionado con el desarrollo Web con Perl: desde CGI hasta Mojolicious

Notapor TELCO71 » 2006-10-12 09:14 @426

Estimado Explorer , :lol:

Tengo este simple código de una página de Login... ¿Cómo podría hacer para que valide contra un archivo el user y el pass y le dé ingreso a mis users ???
También necesito que luego del ingreso válido se vincule con mi otra página para ejecutar los scripts.

¿Cómo se te ocurre que podría realizarlo de la forma más fácil posible?

Sintáxis: [ Descargar ] [ Ocultar ]
  1. <html> 
  2. <head> 
  3. <title>LOGIN</title> 
  4. <STYLE TYPE="text/css"> 
  5. <!--  
  6. BODY, TABLE, TR, TD {font-family: "Verdana, Arial, Helvetica, sans-serif"; font-size: 12px; color: #336699} 
  7. A {text-decoration: none; color: #336699} 
  8. A:hover {text-decoration: underline; color: #336699;} 
  9. --> 
  10. </style> 
  11. </head> 
  12. <body bgcolor="#FFFFFF"> 
  13. <form method="post" action="/index.php"> 
  14. <table align="center" border=0> 
  15. <tr> 
  16. <td colspan="2"> 
  17. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
  18. <p align="right"><b></b></p> 
  19. </td> 
  20. </tr> 
  21. <tr> 
  22. <td colspan="2"> 
  23. <center><h2>LOGIN</h2></center> 
  24. </td> 
  25. </tr> 
  26. <tr height="10"></tr> 
  27. <tr> 
  28. <td><div align=right>Usuario:</div></td> 
  29. <td> 
  30. <input type="text" name="username" size="20"></td> 
  31. </tr> 
  32. <tr> 
  33. <td><div align=right>Password:</div></td> 
  34. <td><input type="password" name="password" size="20"></td> 
  35. </tr> 
  36. <tr height="10"></tr> 
  37. <tr> 
  38. <td colspan="2"> 
  39. <center><input type="submit" value="Login"></center> 
  40. </td> 
  41. </tr> 
  42. </table> 
  43. <input type="hidden" name="action" value="login"> 
  44. </form> 
  45. <center> 
  46. </center> 
  47. </body> 
  48. </html> 



¡¡ Saludos y muchas gracias !! :wink:
TELCO
Avatar de Usuario
TELCO71
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-08-10 10:43 @488
Ubicación: Buenos Aires / Argentina

Publicidad

Notapor explorer » 2006-10-12 09:38 @443

En este foro hay una solución, en el área de tutoriales:
http://perlenespanol.com/tutoriales/cgi ... asena.html

No es exactamente lo mismo, pero sí que tiene alguna de las bases necesarias para lo que necesitas.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor TELCO71 » 2006-10-12 12:26 @559

Estimados , :lol:

Creé el archivo de Passwords en el directorio /etc/apache2/ con el siguiente comando :

htpasswd -c passwords admin

Configuré el archivo " .htaccess " que lo tengo en /var/wwww/ con las siguientes lineas :

Código: Seleccionar todo
/var/www# more .htaccess
AuthUserFile /etc/apache2/passwords
AuthGroupFile /dev/null
AuthName "mensaje de Bienvenida"
AuthType Basic
<Limit GET>
require valid-user
</Limit>



Creo que obviamente hay que ponerle algunas líneas de código en la página web para que chequee contra el archivo " .htaccess " ... ¿¿ como hago eso desde la siguiente página ??
Sintáxis: [ Descargar ] [ Ocultar ]
  1. <html> 
  2. <head> 
  3. <title>LOGIN</title> 
  4. <STYLE TYPE="text/css"> 
  5. <!--  
  6. BODY, TABLE, TR, TD {font-family: "Verdana, Arial, Helvetica, sans-serif"; font-size: 12px; color: #336699} 
  7. A {text-decoration: none; color: #336699} 
  8. A:hover {text-decoration: underline; color: #336699;} 
  9. --> 
  10. </style> 
  11. </head> 
  12. <body bgcolor="#FFFFFF"> 
  13. <form method="post" action="/index.php"> 
  14. <table align="center" border=0> 
  15. <tr> 
  16. <td colspan="2"> 
  17. &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
  18. <p align="right"><b></b></p> 
  19. </td> 
  20. </tr> 
  21. <tr> 
  22. <td colspan="2"> 
  23. <center><h2>LOGIN</h2></center> 
  24. </td> 
  25. </tr> 
  26. <tr height="10"></tr> 
  27. <tr> 
  28. <td><div align=right>Usuario:</div></td> 
  29. <td> 
  30. <input type="text" name="username" size="20"></td> 
  31. </tr> 
  32. <tr> 
  33. <td><div align=right>Password:</div></td> 
  34. <td><input type="password" name="password" size="20"></td> 
  35. </tr> 
  36. <tr height="10"></tr> 
  37. <tr> 
  38. <td colspan="2"> 
  39. <center><input type="submit" value="Login"></center> 
  40. </td> 
  41. </tr> 
  42. </table> 
  43. <input type="hidden" name="action" value="login"> 
  44. </form> 
  45. <center> 
  46. </center> 
  47. </body> 
  48. </html> 


La página de inicio que posteé anteriormente pasa a la siguiente sin realizar la autenticación ... que estoy haciendo mal ? :cry:

Saludos y gracias ! :wink:
TELCO
Avatar de Usuario
TELCO71
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-08-10 10:43 @488
Ubicación: Buenos Aires / Argentina

Notapor explorer » 2006-10-12 12:59 @582

La autenticación no la hace la página web, si no el cgi.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor TELCO71 » 2006-10-12 13:06 @587

Estimado Explorer, :D

Y que puede estar pasando que no me funciona con la página web que tengo para el ingreso de user y pass ???
Te agradeceré toda la ayuda que me puedas dar con este tema.

Saludos y gracias !
TELCO
Avatar de Usuario
TELCO71
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-08-10 10:43 @488
Ubicación: Buenos Aires / Argentina

Notapor explorer » 2006-10-12 13:19 @597

No estás llamando a ningún cgi para hacer la autenticación. Por favor, repasa los tutoriales.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor TELCO71 » 2006-10-12 16:12 @716

Estimados ,

Encontré un tutorial con algo como esto ... pero no me funciona :cry:

Que estoy haciendo mal ??

Es algo tan sencillo como esto lo que necesito ... alguién implementó algo parecido ???

Luego de poner bien o mal la password me aparece la página en blanco ...

LOGIN.html :
____________

<form name="login" action="login.php" method="post">

Usuario: <input type="text" value="Usuario" name="usuario"> <br>

Contraseña: <input type="password" name="pass"> <br>

<input type="submit" value="Enviar">

</form>



login.php :
____________

<%
user = 'admin'
contra = '12435'

usuario = Request.Form ( "usuario" )
pass = Request.Form ( "pass" )

if user = usuario and contra = pass then

response.write "Contraseña valida"

else

response.write "Contraseña invalida"
end if
%>


Saludos y muchas gracias.
TELCO :D
Avatar de Usuario
TELCO71
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-08-10 10:43 @488
Ubicación: Buenos Aires / Argentina

Notapor kidd » 2006-10-12 16:21 @723

Hola:

Te estás complicando demasiado la vida. Te recomiendo que sigas paso a paso el tutorial que te mostró explorer pues ahí viene una buena solución para lo que necesitas.


Saludos
Uriel Lizama Perl programmer fundador de Perl en Español
Perl Programming Language
Avatar de Usuario
kidd
Creador de Perl en Español
Creador de Perl en Español
 
Mensajes: 1166
Registrado: 2003-10-15 16:52 @744
Ubicación: México

Notapor explorer » 2006-10-12 19:08 @839

¿PHP? ¿Hemos dicho algo en este foro de hacer con PHP?
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor TELCO71 » 2006-10-19 16:03 @711

Estimado Explorer :lol: ,

Ya pude solucionar el tema de la página de validación con la info de la siguiente URL :
http://www.webtaller.com/construccion/l ... na-php.php
( La posteo por si le puede servir a alguien .... :oops: ) No solo de Perl vive el hombre ... JEJEJE :wink:

Ahora te comento una inquietud que tengo. Todo me funciona OK ... pero quiero mejorar algunas cosas de estética.
Por ejemplo cuando oprimo los botones que activan los scripts me aparece una pantalla con la ejecución de dicho script de Perl.
¿¿¿ Hay alguna forma de que no se vea la ejecución de dicho script ???

http://10.0.2.24/cgi-bin/CAMBIO.pl

También me gustaría que luego de ejecutarse el script me redirija nuevamente a una página determinada como la que lo lanzó sin necesidad de tener que volver hacia ella desde el browser ...

¿¿¿ Cómo te parece que podría realizarlo ???

¡¡ Saludos y muchas gracias !! :wink:

TELCO :oops:
Avatar de Usuario
TELCO71
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-08-10 10:43 @488
Ubicación: Buenos Aires / Argentina

AnteriorSiguiente

Volver a Web

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 4 invitados