Perl in PHP konvertieren

Einklappen
X
 
  • Filter
  • Zeit
  • Anzeigen
Alles löschen
neue Beiträge

  • Perl in PHP konvertieren

    Hallo,

    ich habe ein skript in perl geschrieben. Jetzt möchte ich das skript in php schreiben. Leider kenne ich mich noch nicht mit den File operationen aus.

    Die nachstehenden zwei passagen bereiten mir Probleme. Vielleicht könnte mir jemand helfen bzw. mich in die richtige Richtung schubsen:

    1. Auslesen aller Zeilen einer Datei
    open(Datei, "</usr/local/infosystems/www/doc/MARKETING/cgi-bin/user.dat") || die "Datei nicht gefunden";
    my @UserZeilen = <Datei>;
    my $nUser = @UserZeilen;
    close(Datei);

    2. Neuer Eintrag in eine Datei
    open(FH,">>/usr/local/infosystems/www/doc/".$Lage."/cgi-bin/conversion.dat") || die "Datei nicht gefunden";
    print FH $cgi->remote_host(),";;;",
    $cgi->referer(),";;;",
    $cgi->user_name(),";;;",
    $cgi->user_agent(),";;;",
    $AktuellesDatum,";;;",
    $AktuelleUhrzeit,";;;";
    for(my $i = 0; $i < $#Feldnamen; $i++) {
    print FH $cgi->param($Feldnamen[$i]),";;;";
    #if ($i < ($#Feldnamen - 1)) { print FH ";;;";}
    }
    print FH $Ergebnis,";;;",$AlteUhrzeit;

    if ($Ergebnis eq "unbekannt") {print FH "\n";}

    close(FH);

  • #2
    http://de.php.net/manual/de/ref.filesystem.php

    im besonderen sollten du dir fopen() und fput() anschauen.

    Kommentar


    • #3
      Punkt 1 geht mit der Funktion file()

      Punkt 2 geht mit der Funktion fputs() (bzw. fwrite()), oder mit fprintf(). Daneben fopen() und fclose(). Bei fopen() einen passenden Modus verwenden ('a' oder 'w' ?)
      Zuletzt geändert von tcpip; 05.07.2006, 11:21.

      Kommentar

      Lädt...
      X