RE: Скрипт на Perl..Проблема

Karamba — Fri, 01 Feb 2002 20:56:00 GMT

а что у тебя получится, если ты для проверки поменяешь местами

[code]
print FILE &site_header();
[/code]

и

[code]
print FILE &site_footer();
[/code]

если в этом случае запишется только header, то ответ, я думаю, появится сам.

Скрипт на Perl..Проблема

Gary — Tue, 28 Aug 2001 14:43:00 GMT

При выполнении скрирта в newtest.html записывается толко footer..
В чем проблема?
[code]
#!/usr/local/bin/perl

$newfile = ".../newtest.html";

open (FILE, ">$newfile");
print FILE &site_header();

print FILE &site_footer();
close(FILE);
print "Content-type: text/html

";
print "OK
";

sub site_header
{
open(HEADERFILE, "header.txt");
@HEADER = <HEADERFILE>;
close(HEADERFILE);

return @HEADER;
}
sub site_footer
{
open(FOOTERFILE, "footer.txt");
@FOOTER = <FOOTERFILE>;
close(FOOTERFILE);

return @FOOTER;
}
[/code].

Релиб / Веб-программирование / Perl / Скрипт на Perl..Проблема / Latest Posts

RE: Скрипт на Perl..Проблема

Скрипт на Perl..Проблема