Include.. ?

[Maico]

Hi,

Ive got a problem..

I'm making something in CGI-PERL but now i want to 'include' a footer and a header on the main site.

But this code dousn't work :

include("pages/header.cgi");

I also tried :

$header = "[your file here]";

print "Content-type: text/html\n\n";
open(FILE,"$header");
while() {
print $_;
}

But it just freezes then..

Can some one help me out ?


Thnx

[drhowarddrfine]

You are trying to write C code for Perl. It's not exactly the same thing. There is no "include" statement like in C. You must use "use" or "require".

[Maico]

You are trying to write C code for Perl. It's not exactly the same thing. There is no "include" statement like in C. You must use "use" or "require".

Oke.. but what command would that be then..
I'm a kind a n00b :rolleyes:

[drhowarddrfine]

Well, "use" and "require" are what you need. They are similar to saying "include" in C. Go here (http://learn.perl.org/library/beginning_perl/) to read about subroutines and modules.

[Charles]

#!c:\perl\bin\perl.exe

use strict;
use CGI qw (header);
use CGI::Carp qw(fatalsToBrowser);

my $include = 'test.html';

open (INCLUDE, $include) or die "Include file $include not found.\n";

print header;
print $_ while (<INCLUDE>);