String Perl

print ord 'ABC';