Perl - How to "include" like in PHP?

[L.C.]

my %config = 
(
require "./config.pl";	# load user accessible configuration

blahblahotherstuffhere;
);

 

That obviously does not work. How do I get it to load a specific file -- or "include" just like in PHP?

 

EDIT: That or someone ought to package me a TCAdmin/formal-gameserver ready package of ChatNet. Then I could offer ChatNet hosting.

Edited February 19, 2010 by L.C.

[JoWie]

I usually do something along the lines of:

 

my %defaultconfig = (
 bla => 'bla',
);
my %userconfig = do "bnc.conf" or die("Unable to load config file: $!");
my %config = (%defaultconfig, %userconfig);

 

bnc.conf looks like:

return (
 something => 'bla'
);