Milka Kuh: Fehlermeldung

HI,
Ich habe zu meinem Thema schon einmal gepostet aber es ist so lange her, dass der Beitrag jetzt zu weit unten steht ;-)

Perl-Programm:
#!/usr/bin/perl

$online = '../opensign.gif';
$offline = '../flammeblau.jpg';

print "Content-type: text/html\n\n";
print '<html>';
print '<head>';
print '<title> FTP-Server </title>';
print '</head>';
print '<body>';

if ( -e $online )
{
print "<img src='$online'>";
}
else
{
print "<img src='$offline'>";
}

print '</body>';
print '</html>';

Fehlermeldung:

Subroutine cwd redefined at C:/Perl/lib/Cwd.pm line 397
Subroutine getcwd redefined at C:/Perl/lib/Cwd.pm line 398
Subroutine fastcwd redefined at C:/Perl/lib/Cwd.pm line 399
Subroutine fastgetcwd redefined at C:/Perl/lib/Cwd.pm line 400
Subroutine abs_pathcwd redefined at C:/Perl/lib/Cwd.pm line 401

Wisst ihr, was diese Fehlermeldungen bedeuten ? Für die Leute, die meinen Beitrag weiter unten gelsen haben: Die Tipps haben leider nicht funktioniert und die Perl-Documentation ist auf Englisch und das kann ich nicht gerade gut ;-|

Naja Danke jedenfalls
Milka Kuh (bin m also eigentlich Ochse)

  1. use Mosche;

    Ich habe zu meinem Thema schon einmal gepostet aber es ist so lange her, dass der Beitrag jetzt zu weit unten steht ;-)

    Sowas wird hier nicht gerne gesehen. Viele lesen hier _weit_ runter. Fehlende Antworten liegen vielleicht eher an deiner Art der Fragestellung.

    Fehlermeldung:

    Subroutine cwd redefined at C:/Perl/lib/Cwd.pm line 397
    Subroutine getcwd redefined at C:/Perl/lib/Cwd.pm line 398
    Subroutine fastcwd redefined at C:/Perl/lib/Cwd.pm line 399
    Subroutine fastgetcwd redefined at C:/Perl/lib/Cwd.pm line 400
    Subroutine abs_pathcwd redefined at C:/Perl/lib/Cwd.pm line 401

    Wisst ihr, was diese Fehlermeldungen bedeuten ?

    Es bedeutet, daß die angegebenen Subroutinen mehrmals definiert werden. Aus deinem angegebenen Code ist der Fehler nicht ersichtlich.

    Du solltest das Modul Cwd nur einmal einbinden...

    use Tschoe qw(Matti);

    1. Ich habe zu meinem Thema schon einmal gepostet aber es ist so lange her, dass der Beitrag jetzt zu weit unten steht ;-)

      Sowas wird hier nicht gerne gesehen. Viele lesen hier _weit_ runter. Fehlende Antworten liegen vielleicht eher an deiner Art der Fragestellung.

      Tschuldigung :-> Kenne die Regeln hier noch nicht ganz :-|

      Fehlermeldung:

      Subroutine cwd redefined at C:/Perl/lib/Cwd.pm line 397
      Subroutine getcwd redefined at C:/Perl/lib/Cwd.pm line 398
      Subroutine fastcwd redefined at C:/Perl/lib/Cwd.pm line 399
      Subroutine fastgetcwd redefined at C:/Perl/lib/Cwd.pm line 400
      Subroutine abs_pathcwd redefined at C:/Perl/lib/Cwd.pm line 401

      Wisst ihr, was diese Fehlermeldungen bedeuten ?

      Es bedeutet, daß die angegebenen Subroutinen mehrmals definiert werden. Aus deinem angegebenen Code ist der Fehler nicht ersichtlich.

      Du solltest das Modul Cwd nur einmal einbinden...

      Wie mache ich das ?

      Danke
         Milka Kuh