Variable aus URL im Script übernehmen (gelöst) (Perl/CGI)

[thread]16778[/thread]

Variable aus URL im Script übernehmen [gelöst]

Tags: perl5 CGI SSI Ähnliche Threads

Leser: 18

Articles: hide open all | hide show old branches

+12 replies
Compined

2011-10-05 17:57
User since
2011-10-05
7 Artikel
BenutzerIn
Hallo zusammen,

ich hab folgendes Problem. Ich würde gerne der Script-URL einen Parameter anhängen. Dieser soll dann dem Script selbst übergeben werden. Wie mache ich das

Beispiel:
Code: (dl )

http://www.testdomain.tld/cgi-bin/script.pl?$file=/pfad/zum/einem/anderen/script.txt
So nun soll dem Script der Pfad übergeben werden, damit die entsprechende Datei auch gefunden wird.

Was muss ich dem Script hinzufügen, damit aus der URL der Parameter dem Script übergeben werden kann.

modedit Editiert von pq: url in code-tags gesetzt
Last edited: 2011-10-05 18:09:46 +0200 (CEST)
- +2 replies
- pq
  
  2011-10-05 18:31
  
  User since
  2003-08-04
  12209 Artikel
  Admin1
  
  du möchtest das skript /pfad/zum/einem/anderen/script.txt ausführen und ihm weitere parameter übergeben?
  
  zunächst mal sieht das sehr gefährlich aus, über CGI einen kompletten pfad zu einem skript zu übergeben.
  da kann ja dann alles mögliche drinstehen.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - rosti
    
    2011-10-05 21:06
    
    User since
    2011-03-19
    3726 Artikel
    BenutzerIn
    
    2011-10-05T16:31:50 pq
    du möchtest das skript /pfad/zum/einem/anderen/script.txt ausführen und ihm weitere parameter übergeben?
    
    zunächst mal sieht das sehr gefährlich aus, über CGI einen kompletten pfad zu einem skript zu übergeben.
    da kann ja dann alles mögliche drinstehen.
    
    Ja, Vorsicht!!! Auch wenns per SSI geht, mache da sicherheitshalber ein mapping, ganz einfach über einen hash: Der Parameter ist dann eine Ziffer oder eine String und der lokale Pfad bleibt dahinter verborgen. Btw., genau das war meine erste "selbstprogrammierte" Sicherheitslücke, ist lange her :)
    http://rolfrost.de/wallpaper.html
    
    WallPaper -- jeden Monat neu. Mit nur 2 Klicks den Aktuellen Monat auf dem Desktop.
- bianca
  
  2011-10-05 18:43
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Für mich sieht das wie ein einfacher GET-Parameter hinter dem ? aus, der mit CGI.pm ausgelesen werden kann.
  
  Bitte die Frage bzw. das Problem konkretisieren!
  10 print "Hallo"
  20 goto 10
- +8 replies
- Compined
  
  2011-10-05 19:38
  
  User since
  2011-10-05
  7 Artikel
  BenutzerIn
  
  Keine Ahnung wie das richtig funktioniert ob mit GET oder anders. Das ist ja meine Frage. Das Script liest Daten per EXEC ein. Da ich aber nur EIN Script verwenden möchte muss ich den Pfad zu dem TXT File im EXEC-String mit drin stehen haben.
  
  Vielleicht hat ja jemand einen Codeschnipsel mit dem ich etwas anfangen kann.
  - +6 replies
  - pq
    
    2011-10-05 19:44
    User since
    2003-08-04
    12209 Artikel
    Admin1
    
    ich habe es immer noch nicht kapiert.
    
    wenn es wirklich nur um das einlesen eines parameters in script.pl geht:
    
    aufruf: /script.pl?file=abc
    
    Code (perl): (dl )
    
    1 2 3
    
    use CGI; my $cgi = CGI->new; my $file = $cgi->param('file');
    
    wenn du aber diese datei ausführen möchtest und dieser einen *weiteren* parameter übergeben willst, musst du den eben auch noch an die url anhängen und dem script per kommandozeile als parameter übergeben.
    ich sehe das problem nicht.
    
    aufruf: /script.pl?file=abc&parameter1=foo
    
    Code (perl): (dl )
    
    1 2 3 4 5
    
    use CGI; my $cgi = CGI->new; my $file = $cgi->param('file'); my $param1 = $cgi->param('parameter1'); exec($file, $param1);
    
    aber wie gesagt, vorsicht, weil der aufrufer der url einen beliebigen pfad angeben kann! das solltest du auf jeden fall behandeln, am besten mit einer dispatch-tabelle.
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    - +5 replies
    - Compined
      
      2011-10-05 20:27
      
      User since
      2011-10-05
      7 Artikel
      BenutzerIn
      
      Das war schon einmal so die Richtung was ich haben wollte. Wenn ich nun das Script im Browser direkt aufrufe, dann klappt das auch. Allerdings funktioniert es nicht wenn ich es direkt über eine HTML-Datei aufrufe. Ich rufe das Script direkt als EXEC-CGI innerhalb einer HTML-Datei auf. Muss ich vielleicht noch die "/" ändern?
      
      So steuer ich das Script nun an:
      
      Code: (dl )
      
      
      
      da kommt auch die Fehlermeldung [an error occurred while processing this directive]
      
      Gebe ich das ganze aber im Browser direkt ein dann geht es.
      - pq
        
        2011-10-05 20:28
        
        User since
        2003-08-04
        12209 Artikel
        Admin1
        
        hättest du vielleicht gleich erwähnen sollen, dass es sichum SSI (Server Side Includes) handelt.
        ich füg das mal zu den thread-tags hinzu
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
      - +2 replies
      - pq
        
        2011-10-05 20:35
        
        User since
        2003-08-04
        12209 Artikel
        Admin1
        
        also bei mir ist SSI lange her.
        du bekommst einen fehler - wo? und der fehler kommt nur, wenn du den file-parameter anhängst oder immer? wird denn das script.pl zumindest ausgeführt? was steht sonst noch im errorlog?
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        Compined
        
        2011-10-05 20:38
        
        User since
        2011-10-05
        7 Artikel
        BenutzerIn
        
        Hab's hinbekommen mit "include virtual" Danke für deine Bemühungen.
      - pq
        
        2011-10-05 20:40
        
        User since
        2003-08-04
        12209 Artikel
        Admin1
        
        dann klick bitte noch auf den grünen haken unter dem titel.
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - bianca
    
    2011-10-05 20:04
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    2011-10-05T17:38:50 Compined
    Das Script liest Daten per EXEC ein.
    
    Was soll das denn sein?
    exec() ist ein Kommando in Perl. Ein "per EXEC" einlesen gibt es nicht.
    Meinst du eine Parameterübergabe per Kommandozeile via @ARGV ? Dafür hat pq schon einen Hinweis gegeben.
    Zeig doch mal ein bisschen, was du da hast und was du ändern willst.
    10 print "Hallo"
    20 goto 10

View all threads created 2011-10-05 17:57.