Forum Webscript.Ru
Программирование => Perl => Тема начата: Millenium от 29 Ноября 2002, 07:52:20
-
Здравствуйте!
У меня вот есть сайт, но я хочу вставить его в перл для большей функциональности.. и хотелось чтобы меня открывалось нампример на ссылку.... index.pl?menu=news - это был раздел NEWS... ну а второй index.pl?menu=history... ну и третий с оотвественно index.pl?menu=about..
Я хочу текст этих разделов вынести на txt чтобы его можно было изменять, а все разделы должны быть подпрограммами.!
Помогите, пожалуйста...
-
У меня вот есть сайт, но я хочу вставить его в перл
Ты хочешь, чтобы мы его "вставили в Perl"? Учи Perl, почитай FAQ для начала, будут конкретные вопросы - спрашивай.
-
#!/usr/bin/perl -w
use strict;
use CGI qw (:standart);
my $Objekt=new CGI;
my $Menu = $Objekt->param("menu");
my $content;
if($Menu eq "news"){
open LIST, "< news.txt";
$content=;
close(LIST);
}elseif($Menu eq "history"){
open LIST, "< history.txt";
$content=;
close(LIST);
}else{
open LIST, "< about.txt";
$content=;
close(LIST);
}
print "Content-type: text/html; Charset=windows-1251\\n\\n";
print $content;
exit;
Гы. Вот примерно так:-) Фукнкциональности это конечно не прибавит:-))) Но пальцы гнуть можно, что у тебя всё на скриптах завязано:-)))) Кстати добавляй что не только на скриптах, но ещё и на базах, всё равно никто проверить не сможет:-))) Тока когда пальцы будешь гнуть потолок не поцарапай;-))
А ещё лучше послушай YA, дело говорит;)