Konstanten in Modulen - #51662 (Allgemeines zu Perl)

2005-02-13 18:29

User since
2003-08-04
12209 Artikel
Admin1

[quote=esskar,13.02.2005, 16:34]ich hab festgestellt, dass "use constant" langsam ist (hab das sonst immer sehr intensiv genutzt),[/quote]
hmm, hast du nen benchmark da?

Quote
deswegen bedien ich mich jetzt folgender möglichkeit:
Code: (dl )
1
2
3
4
5
6
7
package mymodule;
sub NAME { 'Alex' }
1;

package main;
print mymodule::NAME;
1;

use constant macht im prinzip nichts anderes, es ist aber noch einen
tick cleverer und macht in etwa sowas: sub NAME() { 'Alex' }

fällt dir der folgende unterschied auf?

Code: (dl )

perl -wle'
use constant NAME1 => 23;
sub NAME2 { 23 }
print NAME1 + 1;
print NAME2 + 1'
24
23

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