2010-05-18 7 views

Respuesta

10
# In Foo.pm. 
package Foo; 

use strict; 
use warnings; 

use base qw(Exporter); 
our @EXPORT = qw(bar); 

sub bar { print "bar(@_)\n" } 

1; 

# In your script. 
use strict; 
use warnings; 

require Foo; 
Foo->import('bar'); 
bar(1, 22, 333); 
+0

declaración del 'paquete' va a la cima. – daxim

2

Mira esto "How to dynamically load modules" y también se puede mirar a [DynaLoader - la carga dinámica automática de Módulos Perl] Programación en Perl.

+0

ninguna razón para downvote? – Space

3

La forma más sencilla es probablemente usar un módulo como Module::Load:

use Module::Load; 
load Data::Dumper; 
+0

El enlace está roto. Pruebe http://search.cpan.org/~bingos/Module-Load-0.32/lib/Module/Load.pm, o tal vez incluso http://perldoc.perl.org/Module/Load.html. –

Cuestiones relacionadas