Volker: Zeitanzeige unter PERL

Hallo,
ich bräucht eine aktuelle Zeitangabe in Perl. Ich habe so gemacht (siehe unten) - läuft bei mir zu Hause, aber nicht auf Fremdservern. Was ist der Fehler??
Gruß
Volker

#!/usr/bin/perl

($second, $minute, $hour, $dayofmonth, $month, $year, $weekday, $dayofyear, $isDST) = localtime(time);
$month = $month + 1;
$year = substr($year, 1, 2);
$Datum = "$dayofmonth.$month.$year  $hour:$minute:$second";

print "Die aktuelle Zeit auf dem Server ist : $Datum";

  1. Hi Volker,

    #!/usr/bin/perl

    ($second, $minute, $hour, $dayofmonth, $month, $year, $weekday, $dayofyear, $isDST) = localtime(time);
    $month = $month + 1;
    $year = substr($year, 1, 2);
    $Datum = "$dayofmonth.$month.$year  $hour:$minute:$second";

    print "Die aktuelle Zeit auf dem Server ist : $Datum";

    abgesehen davon, dass ein paar Variablen nicht genutzt werden (perl -w meckert sowas an) ist Deine Funktion richtig. Du machst mich nun neugierig: Was genau geht damit auf einem Fremdserver nicht?

    Viele Grüße, Rolf

    1. abgesehen davon, dass ein paar Variablen nicht genutzt werden (perl -w meckert sowas an) ist Deine Funktion richtig. Du machst mich nun neugierig: Was genau geht damit auf einem Fremdserver nicht?

      Viele Grüße, Rolf

      Teste mal den Link oben

      Gruß,
      Volker

      1. Teste mal den Link oben

        Gruß,
        Volker

        Hallo Volker
        Vermutlich hast du die Content-Type-Angabe vergessen

        Henryk Plötz
        Grüße von der Ostsee

        1. Hallo Volker
          Vermutlich hast du die Content-Type-Angabe vergessen

          Henryk Plötz
          Grüße von der Ostsee

          Tjaja, das Prg lautet jetzt so und funzt immer noch nicht:

          #!/usr/bin/perl

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

          ($second, $minute, $hour, $dayofmonth, $month, $year, $weekday, $dayofyear, $isDST) = localtime(time);
          $month = $month + 1;
          $year = substr($year, 1, 2);
          $Datum = "$dayofmonth.$month.$year  $hour:$minute:$second";

          print "Die aktuelle Zeit auf dem Server ist : $Datum";

          Gruß,
          Volker

          1. » Tjaja, das Prg lautet jetzt so und funzt immer noch nicht:

            #!/usr/bin/perl

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

            ($second, $minute, $hour, $dayofmonth, $month, $year, $weekday, $dayofyear, $isDST) = localtime(time);
            $month = $month + 1;
            $year = substr($year, 1, 2);
            $Datum = "$dayofmonth.$month.$year  $hour:$minute:$second";

            print "Die aktuelle Zeit auf dem Server ist : $Datum";
            Gruß,
            Volker

            Hallo Volker!
            Auf mycgiserver.com funktioniert das!

            Henryk Plötz
            Grüße von der Ostsee

          2. Tjaja, das Prg lautet jetzt so und funzt immer noch nicht:

            #!/usr/bin/perl

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

            ($second, $minute, $hour, $dayofmonth, $month, $year, $weekday, $dayofyear, $isDST) = localtime(time);
            $month = $month + 1;
            $year = substr($year, 1, 2);
            $Datum = "$dayofmonth.$month.$year  $hour:$minute:$second";

            print "Die aktuelle Zeit auf dem Server ist : $Datum";

            Hallo Volker,
            bei mir läuft das Script einwandfrei. Beim übertragen mit FTP solltest Du mal im ASCII-Modus übertragen.
            Gruss, Anil

          3. Hi,

            Tjaja, das Prg lautet jetzt so und funzt immer noch nicht:

            "funktioniert nicht" funktioniert nicht. Bitte _immer_ eine Fehlerbeschreibung beifügen! Welcher Fehler, was steht im Error-log, wie arbeitet das Script auf dem Zielrechner von der Kommandozeile aus, was hast Du sonst noch versucht, um den Fehler zu lokalisieren?

            Cheatah

  2. Hi,

    ich bräucht eine aktuelle Zeitangabe in Perl. Ich habe so gemacht (siehe unten) - läuft bei mir zu Hause, aber nicht auf Fremdservern. Was ist der Fehler??

    Dein Script läuft auf jedem Rechner mit dazu passend installiertem Perl (= entweder ist der Standort des Perl-Interpreters auf dem System egal, oder er liegt bei /usr/bin/perl). Es ist aber kein CGI-Script.

    #!/usr/bin/perl -w
    use strict;

    die folgenden Zeilen (alle Variablendeklarationen) mit "my" beginnen lassen

    ($second, $minute, $hour, $dayofmonth, $month, $year, $weekday, $dayofyear, $isDST) = localtime(time);
    $month = $month + 1;

    my $year = $year % 100;

    $Datum = "$dayofmonth.$month.$year  $hour:$minute:$second";

    Scripts sind leichter lesbar, wenn Du Dich an eingebürgerte Standards hälst. Variablennamen schreibt man üblicherweise klein, sofern es sich nicht um Systemvariablen wie %ENV handelt. Also "my $datum = ...;"

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

    print "Die aktuelle Zeit auf dem Server ist : $Datum";

    Bitte nicht plenken. Vor den Doppelpunkt gehört kein Leerzeichen.

    Cheatah