2010-09-22 8 views

Répondre

2

Script principal:

my ($x, $y) = (888, 999); 
system('start', 'List Perl files', 'perl', 'other_script.pl', $x, $y); 

L'autre scénario:

print "Args received = @ARGV\n"; 
<STDIN>; 

BTW, il y a probablement une meilleure façon d'atteindre vos objectifs plus importants - par exemple, l'organisation de la fonctionnalité nécessaire en modules. Passer des informations d'un script à un autre via des arguments de ligne de commande et @ARGV peut être un problème et un facteur limitant.

+0

Je pense que c'est ok mais il ferme la fenêtre dès qu'il l'ouvre ... –

+0

était une erreur sur la page, bravo! –

+0

comment puis-je récupérer un tableau de vars ... 'foreach (@ARGV) { print @_. "\ n"; } ; '?? –

Questions connexes