Decoding ASCII with Perl 

say chr(65);                        # A