Hiho,
und hier mein Beitrag nur fuer dich: ;-))
Tss,
sub Bio() { my @Bio = map{ord}split//=>q
[h] «‰dc¹DXee_% ]; @_= map{ord}split//=>q
!Bio Bio Bio Bio!
;map{chr}map{$_+$|---102+shift} @Bio}
;print for Bio;
Gruss,
CK
http://wwwtech.de
--
s s^s<DATA>se;s (([^\s]))(ord($1)%2?
chr(ord($1)-5):chr(ord($1)-3))sieg;s s^s$_see;
__END__
uwlsy%*Sr%kqdphv%yr%AFN4%dy%zzzyhfm3ihC*1'as'>