Ergebnis 1 bis 2 von 2

Thema: Dateiausgabe mit CGI

  1. #1
    Olli
    Gast

    Standard Dateiausgabe mit CGI

    Hallo zusammen,

    ich hab da ein kleines Problem, für einen der CGI beherrscht sicherlich nur Kinderkram... allerdings kann ich CGI noch net.
    ich will beim Aufruf eines CGI-Skriptes immer eine bestimmte Datei ausgeben.

    z.B. Soll immer die Datei "file.log" zurückgegeben werden.

    Vielleichte könnte jemand den Code dazu kurz schreiben?!?

    Besten Dank bereits im vorraus,

    Gruß Olli
    Achtung: Dies ist ein alter Thread im HTML und Webmaster Forum
    Diese Diskussion ist älter als 90 Tage. Die darin enthaltenen Informationen sind möglicherweise nicht mehr aktuell. Erstelle bitte zu deiner Frage ein neues Thema im Forum !!!!!

  2. #2
    Meister(in)
    Registriert seit
    30.05.2004
    Ort
    Wien
    Beiträge
    346
    Danke
    0
    Bekam 0 mal "Danke" in 0 Postings

    Standard

    Hab dir mal ein bißchen was zusammen gesucht:
    Code:
        $ARTICLE = 100;
        open ARTICLE or die "Can't find article $ARTICLE: $!\n";
        while &#40;<ARTICLE>&#41; &#123;...
    
    
        open&#40;LOG, '>>/usr/spool/news/twitlog'&#41;; # &#40;log is reserved&#41;
        # if the open fails, output is discarded
    
    
        open&#40;DBASE, '+<dbase.mine'&#41;             # open for update
            or die "Can't open 'dbase.mine' for update&#58; $!";
    
    
        open&#40;ARTICLE, "caesar <$article |"&#41;     # decrypt article
            or die "Can't start caesar&#58; $!";
    
    
        open&#40;EXTRACT, "|sort >/tmp/Tmp$$"&#41;      # $$ is our process id
            or die "Can't start sort&#58; $!";
    
    
        # process argument list of files along with any includes
    
    
        foreach $file &#40;@ARGV&#41; &#123;
            process&#40;$file, 'fh00'&#41;;
        &#125;
    
    
        sub process &#123;
            my&#40;$filename, $input&#41; = @_;
            $input++;               # this is a string increment
            unless &#40;open&#40;$input, $filename&#41;&#41; &#123;
                print STDERR "Can't open $filename&#58; $!\n";
                return;
            &#125;
    
    
            local $_;
            while &#40;<$input>&#41; &#123;              # note use of indirection
                if &#40;/^#include "&#40;.*&#41;"/&#41; &#123;
                    process&#40;$1, $input&#41;;
                    next;
                &#125;
                #...                # whatever
            &#125;
        &#125;

Ähnliche Themen

  1. Dateiausgabe am Ende des Countdowns
    Von newby im Forum PHP Forum - Apache - CGI - Perl - JavaScript und Co.
    Antworten: 8
    Letzter Beitrag: 25.09.2006, 20:01

Stichworte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •