Tengo el siguiente CGI pero no me funciona en el servidor, ¿podrían decirme dónde está el problema por favor? El sistema operativo del servidor es Linux.
Using perl Syntax Highlighting
#!/usr/bin/perl
package CGI::Carp
package DBD::mysql;
use strict;
use DBI;
my $dbuser = "maest_gonzalo";
my $dbpass = "gjr";
my $dbhost = "localhost";
my $dbname = "maest_ME3REGIS";
my $dbh = DBI->connect("DBI:mysql:$dbname:$dbhost",$dbuser,$dbpass);
my $query = $dbh->prepare( SELECT identif FROM ME3REG );
$query->execute();
package CGI::Carp
package DBD::mysql;
use strict;
use DBI;
my $dbuser = "maest_gonzalo";
my $dbpass = "gjr";
my $dbhost = "localhost";
my $dbname = "maest_ME3REGIS";
my $dbh = DBI->connect("DBI:mysql:$dbname:$dbhost",$dbuser,$dbpass);
my $query = $dbh->prepare( SELECT identif FROM ME3REG );
$query->execute();
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4