Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/04/2009, 23:14
nelsonv
 
Fecha de Ingreso: noviembre-2008
Mensajes: 58
Antigüedad: 15 años, 6 meses
Puntos: 0
Pregunta permisos 755 en perl

Hola como estan.
Por favor si me pueden ayudar estoy haciendo un aplicacion web con perl y mysql encontre un codigo con extencion .cgi, pero no sirve al momento de ejecutarlo se despliega en la pagina web el codigo q se encuentra en el archivo.
Como puedo hacer para q ese codigo no se despliegue en la pantalla sino q se ejecute, estaba en internet viendo q se necesita unos permisos 755, si alguien sabe como hacer esto ayudenme por favor.
Gracias por las respuestas. adjunto el codigo q puse en la aplicacion.

#!/usr/local/bin/perl

use DBI;

print "Content-type:text/html\n\n";


$db_handle = DBI->connect("dbi:mysql:database=mysql;host=localhost; user=root;password=vlady")
or die "Couldn't connect to database: $DBI::errstr\n";

$sql = "SELECT * FROM user";
$statement = $db_handle->prepare($sql)
or die "Couldn't prepare query '$sql': $DBI::errstr\n";

$statement->execute()
or die "Couldn't execute query '$sql': $DBI::errstr\n";
while ($row_ref = $statement->fetchrow_hashref())
{
print "User <b>$row_ref->{User}</b> has privileges on <b>$row_ref->{Host}</b>.<br>";
}

$db_handle->disconnect();