Warum funktioniert mein Perl-CGI-Klagen “Can ' T locate Mysql.pm"?

Habe ich zwei Ordner php und perl. Sie enthalten index.php und index.pl bzw.

Mein Perl-code sieht wie folgt aus:

#!/usr/bin/perl
use Mysql;

print "Content-type: text/html\n\n"; 
print "<h2>PERL-mySQL Connect</h2>";
print "page info";
$host = "localhost";
$database = "cdcol";
$user = "root";
$password = "";
$db = Mysql->connect($host, $database, $user, $password);
$db->selectdb($database);

Wenn ich obigen code (durch Eingabe http://localhost:88/perl/ im browser), bekomme ich die folgende Fehlermeldung:

Can't locate Mysql.pm in @INC (@INC contains: C:/xampp/perl/site/lib/C:/xampp/perl/lib C:/xampp/perl/site/lib C:/xampp/apache) at C:/xampp/htdocs/perl/index.pl line 2. BEGIN failed--compilation aborted at C:/xampp/htdocs/perl/index.pl line 2.

in der Erwägung, dass der Browser http://localhost:88/php/ funktioniert.

index.php hat:

<?php
$con = mysql_connect("localhost","root","");
    if($con)
    {
        if(mysql_select_db("cdcol", $con))
        {
            $sql="SELECT Id From products";
            if(mysql_query($sql))
            {
                $result = mysql_query($sql);
                if ($result) ...
  • Für das Protokoll, Sie haben keine Probleme mit der Verbindung. Sie haben einfach nicht auf die perl-Mysql-Modul installiert in den (xampp) - Pfad.
  • als extraneon sagt, müssen Sie sicherstellen, dass perl ordnungsgemäß konfiguriert ist, für den Benutzer, unter dem der web-server ausgeführt wird.
  • Meine früheren Punkt steht: Es gibt keine Notwendigkeit zu lernen, zu Programmieren, wie es ist 1999. Verwenden DBI. Auch Sie muss verwenden strict und warnings.
  • Nicht nur 15-Jahre alte Perl-tutorials
  • Sinan Ünür: 1999, DBi und "use strict: wurden schon standard, also dieser code ist aus einer noch früheren Zeit.
  • für den alten code.. ich bin neu hier im perl-Sache ..versuchen zu lernen

InformationsquelleAutor dexter | 2010-03-24
  1. 3

    Sollten Sie verwenden DBI in Verbindung mit DBD::mysql.

    Verwenden Sie ein standard-CGI-processing-Modul wie CGI::Simple.

    use strict; use warnings;
use CGI::Simple;
use DBI;

my $cgi = CGI::Simple->new;
my $dsn = sprintf(
    'DBI:mysql:database=%s;host=%s',
    'cdcol', 'localhost'
);

my $dbh = DBI->connect($dsn, root => '',
    { AutoCommit => 0, RaiseError => 0 }
);

my $status = $dbh ? 'Connected' : 'Failed to connect';

print $cgi->header, <<HTML;
<!DOCTYPE HTML>
<html>
<head><title>Test</title></head>
<body>
<h1>Perl CGI Script</h1>
<p>$status</p>
</body>
</html>
HTML
    • obigen code gab mir folgende Fehlermeldung: Der server hat einen internen Fehler und konnte Ihre Anforderung nicht ausführen. Fehlermeldung: Can ' T locate CGI/Einfach.pm in @INC (@INC contains: C:/xampp/perl/site/lib/ C:/xampp/perl/lib C:/xampp/perl/site/lib C:/xampp/apache) an C:/xampp/htdocs/perl/index.pl mit der Linie 4. BEGIN failed--compilation aborted at C:/xampp/htdocs/perl/index.pl mit der Linie 4. ,
    • obigen Fehler habe gelöst, wenn ich.....getippt "ppm install CGI-Simple" in die Befehlszeile ein
    InformationsquelleAutor Sinan Ünür
Schreibe einen Kommentar