SkÃ¥ne Sjælland Linux User Group - http://www.sslug.dk Forside   Tilmelding   Postarkiv   Forum   Kalender   Søg
MhonArc Dato: [Date Prev] [Kronologisk oversigt] [Date Next]   TrÃ¥d: [Date Prev] [Oversigt trÃ¥de] [Date Next]   MhonArc
 

Re: [PERL] Egne moduler?



At 09:39 19-10-2001 +0000, you wrote:
Jeg har en håndfuld subrutiner som jeg bruger i næsten alle min scripts.
Indtil videre kopierer jeg bare koden rundt i alle min scripts, men det er
ikke smart.
Hvordan får jeg nemmest adgang til mine subrutiner, hvis koden kun må ligge
et sted?

Det nemmeste er netop at lave et modul...


Et simpelt modul kunne være dette....

--- Modul kode ---
dev1# pwd
/usr/local/lib/perl5/5.6.1
dev1# cat MyPkg.pm
package MyPkg;

sub test {
    print "Davs";
}

1;
--- Modul kode slut ---


--- Test kode --- bash-2.05$ cat test.pl #!/usr/bin/perl -w

use strict;
use MyPkg;

MyPkg::test;

exit(0);
--- Test kode slut ---

bash-2.05$ ./test.pl
Davsbash-2.05$

/Jesper


// Christian



 
Forside   Tilmelding   Postarkiv   Oversigt   Kalender   Søg

 
 
Henvendelse vedrørende websiderne til <www_admin>. Senest ændret 2005-08-10, klokken 19:54
Denne side vedligeholdes af MHonArc .