Handler <DATA> und Vererbung (gelöst) - #157294 (Allgemeines zu Perl)

2012-04-06 14:06

User since
2003-08-04
12208 Artikel
Admin1

Code (perl): (dl )

1
2
3

no strict 'refs';
my $ref = ref $self;
my $fh = *{ $ref . "::DATA" };

Editiert von pq: no strict
Last edited: 2012-04-06 14:10:06 +0200 (CEST)

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem