Necla: Parameterübergabe zwischen Perl-Scripten

Hallo,

ich möchte von einem Perl-Script ein anderes Per-Script aufrufen. Wie das geht, weiß ich:
     z.B. requiere "alarm.pl";
Dabei muss ich an das aufzurufende Script Parameter übergeben, sonst kann ich es nicht ausführen.

Wie geht das? Gibt es Alternativen? Könnt Ihr mir bitte helfen!!

Gruß,
Necla

  1. Hallo,

    ich möchte von einem Perl-Script ein anderes Per-Script aufrufen. Wie das geht, weiß ich:
         z.B. requiere "alarm.pl";
    Dabei muss ich an das aufzurufende Script Parameter übergeben, sonst kann ich es nicht ausführen.

    Wie geht das? Gibt es Alternativen? Könnt Ihr mir bitte helfen!!

    Gruß,
    Necla

    Die Parameter werden in Klammern gesetzt übergeben und von der aufgerufenen Prozedur mit shift verarbeitet.

    Gruss,
    Lude

    Beispiel:

    Parameter:

    $AlertMeassage = Ausgabenachricht

    $URL = eine URL zu der gesprungen werden soll; ist diese "0", dann wird der naechste Parameter ausgewertet

    $goback = wieweit soll in der Browserhistory zurueckgesprungen werden (z.B. "-2")

    sub alert
     {
     my $AlertMessage = shift;
     my $URL = shift;
     my $goback = shift;
     # Interessant   -   :-)
     print "Content-Type: text/html\n\n";
     print "<html>\n";
     print "<head>\n";
     print "<script language="JavaScript">\n";
     print "function onLoadJob()\n";
     print "{\n";
     print "alert("".$AlertMessage."");\n";
     if ($URL eq '')
      {
      print "window.history.go($goback);\n";
      }
     else
      {
      print 'document.location.href="'.$URL."";\n";
      }
     print "}\n";
     print "</script>\n";
     print "</head>\n";
     print "<body onLoad="javascript:onLoadJob()">\n";
     print "</body>\n";
     print "</html>\n";
     }

  2. Hi,

    ich möchte von einem Perl-Script ein anderes Per-Script aufrufen.
    Wie das geht, weiß ich:
         z.B. requiere "alarm.pl";

    das ist aber kein "Aufruf eines Skripts", sondern ein "Einbinden eines
    Moduls". Und weil es kein Aufruf ist, kannst Du auf diese Weise m. E.
    auch keine Parameter übergeben.

    Wie _will_ denn das zweite Skript aufgerufen werden?

    Meinst Du wirklich ein Perl-Skript oder (weil wir hier im WWW-Kontext
    sind) eine in Perl realisierte CGI-Anwendung, die via HTTP kontaktiert
    werden muß?

    Viele Grüße
          Michael