Zeichen in ASCII umrechnen?! (Allgemeines zu Perl)

[thread]5726[/thread]

Zeichen in ASCII umrechnen?!

[HR]Doomrunner

2003-09-16 18:34

User since
2003-09-04
77 Artikel
BenutzerIn
[default_avatar]

Hi,

ist es möglich ein Zeichen in Perl in eine ASCII Nummer umzurechnen, und anschließend die ASCII Nummer wieder in ein Zeichen? Wäre echt cool, wenn ihr mir dazu was sagen könntet.

Ich weiß das das z.B. damals in Pascal ging .... *grumml

thx

Relais

2003-09-16 18:36

User since
2003-08-06
2244 Artikel
ModeratorIn

<a href="//www.perldoc.com/perl5.8.0/pod/func/ord.html" target="_blank">perldoc -f ord</a>
<a href="//www.perldoc.com/perl5.8.0/pod/func/chr.html" target="_blank">perldoc -f chr</a>

Erst denken, dann posten --
26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.

Winter is Coming

[HR]Doomrunner

2003-09-16 18:57

User since
2003-09-04
77 Artikel
BenutzerIn
[default_avatar]

perfekt. dank dir

Crian

2003-09-18 19:48

User since
2003-08-04
5866 Artikel
ModeratorIn

Wirf mal einen Blick in meine Signatur ;-)

Edit: Wie hießen denn die beiden Funktionen eigentlich in Pascal ^^ ? (Das waren doch auch chr() und ord(), wenn ich mich richtig erinnere (ist allerdings schon verdammt lange her).)\n\n

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

[E|B]

2003-09-18 19:49

User since
2003-08-08
2561 Artikel
HausmeisterIn

Oder in meine! 8)

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

View all threads created 2003-09-16 18:34.