#!/usr/bin/perl use strict; use warnings; $a = chr(65); print "This is what Alpha looks like $a\n";