Forum Webscript.Ru
Программирование => Perl => Тема начата: Millenium от 20 Ноября 2002, 08:58:04
-
Вопрос конечно будет очень просто (для вас), но я только начинаю рботать с перл..) так что заранее прошу прощения...
Итак, вопрос такой:
У меня есть несколько подпрограмм(в одном файле-скрипте), но мне их нужно собрать вместе в одном окне, т.е. окно браузера будет рабиваться на фреймы. Так вот, как мне например поставить одну из подпрограмм в нижнем фрейме?
Знаю, непонятно.... но постарайтесь ответить... спасибо..
-
Разбей файл с подпрограммами на несколько и вызывай каждый скрипт отдельно.
-
или открывай файл в разных фреймах с разными параметрами.
-
mike Так а как вызывать отдельно? Я вообще то это и спрашивал...!
Croaker Так и говорил про фреймы...
-
---------------------------------------- file.html --------------------------------
----------------------------------- script.cgi ---------------------------------
#!/usr/bin/perl -w
use CGI;
my $cgi = new CGI;
print $cgi->header();
if($cgi->param(\'p\') == 1)
{
print \'Это один фрейм\';
}
elsif($cgi->param(\'p\') == 2)
{
print \'Это другой фрейм\';
}
-
Был у тебя скрипт с двумя подпрограммами:
sub sub1 {
print "Frame1"
}
sub sub2 {
print "Frame2"
}
А вот разные скрипты:
---------------------------------------- file.html --------------------------------
----------------------------------- script1.cgi ---------------------------------
#!/usr/bin/perl -w
use CGI;
my $cgi = new CGI;
print $cgi->header();
print \'Frame1\';
----------------------------------- script2.cgi ---------------------------------
#!/usr/bin/perl -w
use CGI;
my $cgi = new CGI;
print $cgi->header();
print \'Frame2\';
-
Спасибо, попробую...!