Module-Path ermitteln - #53589 (Allgemeines zu Perl)

Crian

2005-04-08 13:51

User since
2003-08-04
5872 Artikel
ModeratorIn

[quote=Dubu,07.04.2005, 23:24]Die Pfade zu den eingebundenen Paketen liegen in %INC:

Code: (dl )

package A;

sub new {
   print $INC{"A.pm"};
}

1;

Als Argument muss da ein (relativer) Dateiname stehen, also bei use A ein $INC{"A.pm"} und bei use A::B ein $INC{"A/B.pm"}.

Das geht aber auch gleich im Hauptprogramm:

Code: (dl )

1
2

use A;
print $INC{"A.pm"};

[/quote]
Oh nein, und ich durchsuch immer @INC dafür *vordiestirnschlag*

Ich hoffe ich merks mir....

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite