Opened by PERLScripter at 2014-12-08 11:58
User since
2011-03-19
3492 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2011-03-19
3492 Artikel
BenutzerIn
system() ist nicht schön. Was ich Dir jetzt vorschlage, ist zwar auch nicht schön, aber unabhängig von system() und Du kannst die Pfade in @INC setzen:
Deklariere Deine Variablen in beiden Scripts mit dem Schlüsselwort our, z.B.:
und dann kannst Du das externe Script anstelle system('machwas.pl') mit do 'machwas.pl'; einbinden.
PS/Edit: Anstelle der Deklaration neuer Variablen kannst Du auch das globale Array @ARGV direkt manipulieren und dann das externe Script mit do 'extern.pl' einbinden. Das hat immerhin den Vorteil, dass der externe Code nicht geändert werden muss, es kann so auch als alleinstehendes Script mit Argumenten benutzt werden. Notiere jedoch in der letzten Zeile des externen Scripts eine
Last edited: 2014-12-14 22:17:46 +0100 (CET)
Deklariere Deine Variablen in beiden Scripts mit dem Schlüsselwort our, z.B.:
Code (perl): (dl
)
1 2 3 4 5 6 7
our $foo; # wenns ein bischen mehr sein darf, fasse alles in # einer Referenz zusammen our $args = { x => 'foo', y => [1,2,3,4] };
und dann kannst Du das externe Script anstelle system('machwas.pl') mit do 'machwas.pl'; einbinden.
PS/Edit: Anstelle der Deklaration neuer Variablen kannst Du auch das globale Array @ARGV direkt manipulieren und dann das externe Script mit do 'extern.pl' einbinden. Das hat immerhin den Vorteil, dass der externe Code nicht geändert werden muss, es kann so auch als alleinstehendes Script mit Argumenten benutzt werden. Notiere jedoch in der letzten Zeile des externen Scripts eine
Code (perl): (dl
)
1;
Last edited: 2014-12-14 22:17:46 +0100 (CET)