Thread Module einbinden
(20 answers)
Opened by Gast at 2008-06-06 13:21
Überarbeitet entsprechend dem Beispiel in perlmod.
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 #! /usr/bin/perl package Local::Prime; use strict; use warnings; BEGINN { use Exporter (); our ( $VERSION, @ISA, @EXPORT, @EXPORT_OK ); $VERSION = 1.00; @ISA = qw( Exporter ); @EXPORT = qw( &is_prime ); @EXPORT_OK = qw( &prime_numbers ); } our @EXPORT_OK; sub is_prime { ... } sub prime_numbers { ... } 1; Welchen Vorteil hat die Schreibweise mit dem Begin-Block und warum wird @EXPORT_OK außerhalb nochmal mit our deklariert (bzw. warum z.B. @EXPORT nicht mehr)? |