🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #9010

Re: alweer een Perl vraag

#9010
From: staf wagemakers
Date: Mon, 03 Jun 2002 08:53
37 lines
1732 bytes
In article <B2wK8.10615$ud.731@afrodite.telenet-ops.be>, Ruben wrote:
> 
> Bedankt voor je info, maar kan je me een klein voorbeeldje geven hiervan
> want ik zou het nog niet kunnen.
> 
> stel nu dat het bestandje gebruikme.txt heet
> 

Als je maar een paar functies heb welke je wilt hergebruiken dan je dit 
dan via 'do'

een voorbeeldje:

tst.pl:

  #!/usr/bin/perl

  use warnings;
  use strict;

  do '/path/to/functions.pl';

  myfunction('Hallo');

functions.pl:

  sub myfunction ($) {
    print "Ik ben myfunction, mijn argument $_[0]\n";
  }

een echte perl module schrijven is eigenlijk niet veel moeilijker...

--
Staf Wagemakers

email:          staf.wagemakers@advalvas.be
homepage:       http://stafwag.netfirms.com
Technical Details
Message-ID: <slrnafmbk8.1mm.stafwag@staflaptop.antw.the-ecorp.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!peer.news.opaltelecom.net!newsfeed.wirehub.nl!bnewspeer00.bru.ops.eu.uu.net!bnewsifeed02.bru.ops.eu.uu.net!bnewspost00.bru.ops.eu.uu.net!emea.uu.net!news.be.uu.net!not-for-mail
References: <INuK8.10348$ud.549@afrodite.telenet-ops.be> <JjvK8.10487$ud.581@afrodite.telenet-ops.be> <B2wK8.10615$ud.731@afrodite.telenet-ops.be>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,386404d39b3cc3b3
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-06-03 01:53:37 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!peer.news.opaltelecom.net!newsfeed.wirehub.nl!bnewspeer00.bru.ops.eu.uu.net!bnewsifeed02.bru.ops.eu.uu.net!bnewspost00.bru.ops.eu.uu.net!emea.uu.net!news.be.uu.net!not-for-mail
Newsgroups: be.comp.programming
From: staf wagemakers <stafwag@yahoo.com>
Subject: Re: alweer een Perl vraag
References: <INuK8.10348$ud.549@afrodite.telenet-ops.be> <JjvK8.10487$ud.581@afrodite.telenet-ops.be> <B2wK8.10615$ud.731@afrodite.telenet-ops.be>
Message-ID: <slrnafmbk8.1mm.stafwag@staflaptop.antw.the-ecorp.com>
User-Agent: slrn/0.9.7.4 (Linux)
Date: 03 Jun 2002 08:53:28 GMT
Lines: 38
NNTP-Posting-Host: uu212-190-114-162.unknown.uunet.be
X-Trace: 1023094408 news.be.uu.net 12222 212.190.114.162
X-Complaints-To: abuse@be.uu.net