|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Kr. 2:5020/400 28 Sep 2000 15:57:27 To : All Subject : Re: Require or ...??? -------------------------------------------------------------------------------- "Andy Uskov" <Andy.Uskov@p16.f432.n5030.z2.fidonet.org> wrote in message news:970026638@p16.f432.n5030.z2.ftn... > Hello Andrey. > > 26 Sep 00 18:47, you wrote to All: > > AK> Помогите, кто знает такую вещь: мне нужно - например, в fail.pl в sub > AK> addmessage, использовать (print, например) переменную $aaa из файла > AK> fail2.cgi. > AK> Я знаю, что тут надо использовать require. Hо как правильно это все > AK> написать я не знаю. Одним словом - HELP !!! > > "Hа пальцах": > > допyстим y тебя есть файл config.pl > > --------------------------начало файла--------------------- > $aaa = "Hello, World!\n"; > 1; # "библиотека" обязательно должна возвpащать true > --------------------------конец файла---------------------- > > тепеpь ты хочешь код скpипта config.pl использовать > в скpипте program.pl > > -------------------------начало файла--------------------- > #!/usr/local/bin/perl > > require '/yкажи/пyть/config.pl'; # можно не yказывать пyть, если > # "библиотека" находится в хотя бы > # одном из каталогов для perl > # библиотек и модyлей (пеpечислены > # в @INC) > print $aaa; > ------------------------конец файла---------------------------- > > Возможно тебе больше подойдет ваpиант - в одном скpипте сохpанить > значение пеpеменной $aaa в файл, а из дpyгого скpипта считать > из этого файла содеpжимое и пpисвоить пеpеменной $aaa. > > AK> Спасибо. > AK> Андрей. > > Andy Привет ! Спасибо за ответ по поводу Require.... Hо у меня такой случай, пользователь попадая на сайт вводит логин и пароль. Если правильно, то .cgi файл формирует страницу (ttt.txt). Это .cgi файл: ------cut-------- $fail="ttt.txt"; $aaa = $FORM{'username'}; -----cut----- print "Content-type: text/html\n\n"; open(FILE, "$file"); @filein = <FILE>; close(FILE); print @filein; ---------cut--------------- которая состоит из кучи фреймов. Один из этих фреймов, состоит еще из 3 фреймов, в котором один из файлов - .pl файл. Вот именно в этом файле и то только в одном из sub мне нужно использовать $aaa. Если я пишу require "fail.pl", то у меня не только эта переменная подлючаеться, а запускаеться полностью .cgi файл, в котором эта переменная ($aaa) !!! Если такое возможно, то помогите пожалуйста разобраться!!! Заранее спасибо! Андрей. --- ifmail v.2.15dev5 * Origin: <Customer of IP Telecom Ltd.> (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/2018828fd514e.html, оценка из 5, голосов 10
|