Thread Programmgerüst und Gültigkeitsbereiche (20 answers)
Opened by tonewheel at 2007-04-13 12:24

renee
 2007-04-14 11:24
#23671 #23671
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Das ist eine besondere Variable und liefert Dir den aktuellen Package-Namen:
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

#!/usr/bin/perl

use strict;
use warnings;

package Test;

sub test{
    print __PACKAGE__,"\n";
}

package NochEinTest;

sub test{
    print __PACKAGE__,"\n";
}

package main;

print __PACKAGE__,"\n";
Test->test;
NochEinTest->test;


Ausgabe:
Code: (dl )
1
2
3
4
C:\>perl package.pl
main
Test
NochEinTest


Hier noch was zu CPAN:Class::DBI: http://www.perl.com/pub/a/2003/07/15/nocode.html
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 Programmgerüst und Gültigkeitsbereiche