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
2246 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 --
27. Deutscher Perl- u. Raku -Workshop (Termin wird noch gesucht) 2025 in München.

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
5870 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.