"Jimmy" <spoerg@efter.den> writes:
> Hej
>
> I de fleste af mine scripts tilgår jeg en MySQl database eller en
> FTP-server.
>
> Jeg vil gerne kunne lave disse to dele som et modul, som jeg kan kalde med
> "use" så jeg uden videre kan vise andre min kode uden at skulle fjerne
> user/pass hver gang.
Den simple løsning er at bruge do :
------------------
kim@kanon
$ cat prog.pl
#!/usr/bin/perl -w
use strict;
my $login = do 'login.inc';
print "user: " . $login->{user} . "\n";
print "password " . $login->{password} . "\n";
kim@kanon
$ cat login.inc
{
user => 'bruger',
password => 'banan',
}
kim@kanon
$ ./prog.pl
user: bruger
password banan
kim@kanon
$
--------------------
--
Kim Hansen | |\ _,,,---,,_ | Det er ikke
Dalslandsgade 8, A708 | /,`.-'`' -. ;-;;,_ | Jeopardy.
2300 København S | |,4- ) )-,_. ,\ ( `'-' | Svar _efter_
Phone: 32 88 60 86 | '---''(_/--' `-'\_) | spørgsmålet.