Thread Wo liegt das Modul? (8 answers)
Opened by pktm at 2007-09-13 13:01

renee
 2007-09-13 15:11
#99420 #99420
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Das kann man auch in dem Modul verwenden. %INC ist global...

Beispiel:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
#!/usr/bin/perl

use strict;
use warnings;
use Win32::GuiTest;
use lib './perllib';
use Data::Dumper;

my @array = (1..3);
print Dumper \@array;


Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
package Data::Dumper;

use Exporter;

our @ISA = qw(Exporter);
our @EXPORT = qw(Dumper);

sub Dumper{
    my ($arref) = @_;
    print "Element: $_\n" for @$arref;
    print $_,"\n" for keys %INC;
}


Code: (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
C:\>inc_push.pl
Element: 1
Element: 2
Element: 3
XSLoader.pm
re.pm
warnings/register.pm
ActiveState/Path.pm
Cwd.pm
warnings.pm
base.pm
File/Basename.pm
Config.pm
ActivePerl/Config.pm
Carp.pm
Win32/GuiTest/GuiTest.pc
strict.pm
Exporter.pm
vars.pm
constant.pm
Config_heavy.pl
AutoLoader.pm
Win32/GuiTest.pm
lib.pm
DynaLoader.pm
Data/Dumper.pm


Wie man sieht, sieht auch das Modul, welche Module im Hauptprogramm geladen wurden...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

View full thread Wo liegt das Modul?