Mittwoch, 28.2.2007, 00:06:26 Uhr
chr() in Perl - Zeichen anhand seines ASCII-Codes ermitteln und ausgeben chr () kann man ein Zeichen anhand seines ASCII-Codes ausgeben. Allerdings sind zum großen Teil nur Zeichen > 32 darstellbar, da die darunter liegenden Zeichen meist als Steuerzeichen verwendet werden.Syntax: ord ($asciicode);strict ;CGI ::Carp qw(fatalsToBrowser);print "Content-type: text/html\n\n<html><body><h1>ASCII-Zeichentabelle</h1>";my ($i,$j,$zeichenwert);print "<table>";for ($i=0;$i<12;$i++){print "<tr>";for ($j=0;$j<8;$j++){print "<td width=\"12%\">Code $zeichenwert: ";print chr ($zeichenwert)." ";print "</td>";print "</tr>";print "</table></body></html>";
Ausgabe des Beispiels Thema: Perl Skalare
Der Beitrag "chr() in Perl - Zeichen anhand seines ASCII-Codes ermitteln und ausgeben" wurde 15833 mal gelesen.
0.0244970321655273 sec. to build ...Blogsoftware in pure Perl - Powered by a lot of Coffee...
Gelesene Beiträge insgesamt:
RSS-Feed