Select Code to Download

#!/usr/bin/perl
use warnings;
use strict;

print ord('c'), "\n";

#!/usr/bin/perl
use warnings;
...
printf "%d\n", '12c3';  # printf stops the format conversion at the fi
+rst non-integer  
printf "%d\n", 'c123';  # No characters converted, 0 is returned
printf "%d\n", '0c123'; # Conversion stops after first character, 0 is
+ returned