Perl in PHP konvertieren

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • 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.

    Comment


    • #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' ?)
      Last edited by tcpip; 05-07-2006, 10:21.

      Comment

      Working...
      X