Variablen scriptübergreifend (Allgemeines zu Perl)

[thread]16080[/thread]

Variablen scriptübergreifend

Leser: 25

Articles: hide open all | hide show old branches

+4 replies
Gast Marie

2011-03-17 09:42

Hallo,
ich habe ein script das einige Systeminformationen ausliest und diese in Variablen speichert.
Dieses Script wird aufgerufen und dann noch weitere perl-scripte. Wie kann ich es erreichen, dass die Variablen des ersten Scripts auch in den folgenden noch existieren? Ein Übergabe und dann mittls @ARGV ist in meinem Fall kompliziert
Last edited: 2011-03-17 09:43:58 +0100 (CET)
- bianca
  
  2011-03-17 10:25
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  Das erreichst du, indem du die Variable weiter gibst.
  
  z.B.
  
  Code (perl): (dl )
  
  1 2 3 4 5 6
  
  my $var = 'test'; test ($var); sub test { print "\$var = $_[0]\n"; }
  
  10 print "Hallo"
  20 goto 10
- MatthiasW
  
  2011-03-17 10:46
  User since
  2008-01-27
  367 Artikel
  BenutzerIn
  Du könntest die Skripte zusammenfassen. Zur Not auch mit do:
  
  Code: (dl )
  
  1 2 3 4 5 6
  
  @ARGV = (Argumente erstes Skript); do 'skritp1.pl'; @ARGV = (Argumente zweites Skript); do 'skript2.pl'; ...
  
  Oder aber die Werte in eine Datei schreiben, um sie dann dort wieder auszulesen.
  
  MfG
  perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
- rosti
  
  2011-03-21 20:30
  
  User since
  2011-03-19
  3566 Artikel
  BenutzerIn
  
  Hi,
  
  wenn die Scripts unmittelbar aufeinander oder nahe gleichzeitig ablaufen, würde ich mir IO::Pipe anschauen.
  
  Falls längere Zeiten dazwischen liegen, wäre eine Lösung mit Storable.pm denkbar, damit kannst du auch komplexe Datenstrukturen vorzüglich speichern.
  
  --Rolf
  http://blog.rolfrost.de/
  
  The art of steam.

View all threads created 2011-03-17 09:42.