Opened by Gast at 2004-07-14 12:19
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
Willkommen squirrel, für Dein Problem eignet sich das Modul FindBin, solange Du Dein Modul noch nicht in den offiziellen Modulpfad stellen willst, etwa weil Du noch daran entwickelst. Hier ein Beispiel, wie Dein Programmkopf dann aussehen könnte:
Dann wird das Verzeichnis, in dem Dein Skript liegt, auch nach Modulen durchsucht.\n\n
<!--EDIT|Crian|1089794308-->
Code: (dl
)
1
2
3
4
5
6
7
8
#!/usr/perl/bin
use strict;
use warnings;
use FindBin;
use lib "$FindBin::Bin";
use modul;
Dann wird das Verzeichnis, in dem Dein Skript liegt, auch nach Modulen durchsucht.\n\n
<!--EDIT|Crian|1089794308-->
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
use strict; use warnings; Link zu meiner Perlseite