Christoph Welcz: Chars in ASCII Werte konvertieren?

Hallo,
ich möchte in ein Uploadscript, das das Hochladen von GIFs auf meinen Server erlaubt etwas verfeinern und ne Bildgrößenbegrenzung einbauen - dazu muß ich ja den Header auslesen und insgesamt 4 Bytes auswerten - das Problem ist: mir ist es nicht gelungen, eine Methode ausfindig zu machen, um einnzelne Zeichen in Perl in ihr zugehörigen ASCII Code umzuwandeln

print "Content-type: text/html\n\n";
$A = 'A';
$ASC = sprintf("%d", $A);
print "$A : $ASC";

Dieses Beispielscript liefert als Ergebnis leider nur A : 0,
andersrum, also von Integer zu Char läufts mit %c einwandfrei - kann mir vielleicht jemand von Euch ne Lösung aufzeigen?

thx

  1. Joho,

    [...]

    um einnzelne Zeichen in Perl in ihr zugehörigen ASCII Code umzuwandeln

    print "Content-type: text/html\n\n";
    $A = 'A';
    $ASC = sprintf("%d", $A);
    print "$A : $ASC";

    print ord('c');

    perldoc -f ord

    Gruss,
     CK

    1. Joho,

      [...]

      um einnzelne Zeichen in Perl in ihr zugehörigen ASCII Code umzuwandeln

      print "Content-type: text/html\n\n";
      $A = 'A';
      $ASC = sprintf("%d", $A);
      print "$A : $ASC";

      print ord('c');

      perldoc -f ord

      Gruss,
      CK

      upsi ist ja fast schon so einfach dass es peinlich ist ;)

      trotzdem danke ;)