Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[18.189.13.43] |
|
Сообщ.
#1
,
|
|
|
Доброго времени суток.
Люди добрые подскажите, как надо сделать, есть скрипт main.pl и interface.pl, вызвать в main.pl скрипт interface.pl с аргументами $arg1 $arg2 и вернуть значения отработки interface.pl в main.pl. ?? корячился с system и exec чот не получается |
Сообщ.
#2
,
|
|
|
main.pl
#!/usr/bin/perl $Arg1 = "STRING1"; $Arg2 = "STRING2"; open(FD,"|".(($^O =~ /MSWin/)? "perl ":"")."interface.pl \"$Arg1\" \"$Arg2\"") || die "Shit!"; print join("",<FD>); close(FD); interface.pl #!/usr/bin/perl map {print "$_\n"} @ARGV; Добавлено Хотя проверку ОС можно смело пропустить. |
Сообщ.
#3
,
|
|
|
JoeUser большое спасибо!!! А то я уже через файл начал городить...
|