[quote=zweistein,27.04.2005, 15:46]kannst du dazu auch was schreiben:)[/quote]
ja =)
Allerdings hat Taulmarill ja schon darauf hingewiesen:
[quote=perldoc -f glob,28.04.2005]R:\Banz\HR_Strukt_HuP\CD\erwent\testsystem\prg\modules\HR\ErwEnt>perldoc -f glob
glob EXPR
glob In list context, returns a (possibly empty) list of filename
expansions on the value of EXPR such as the standard Unix shell
/bin/csh would do. In scalar context, glob iterates through such
filename expansions, returning undef when the list is exhausted.
This is the internal function implementing the "<*.c>" operator,
but you can use it directly. If EXPR is omitted, $_ is used. The
"<*.c>" operator is discussed in more detail in "I/O Operators"
in perlop.
Beginning with v5.6.0, this operator is implemented using the
standard "File::Glob" extension. See File::Glob for details.
[/quote]
Außerdem dachte ich, Du probierst den Code vielleicht einfach mal aus.
Und perldoc File::Glob erzählt Dir dann noch viel mehr, als Du wissen wolltest ;)\n\n
<!--EDIT|Crian|1114676949-->
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