find the character's value by using the ord() function
#!/usr/bin/perl use warnings; print"A # has ASCII value ", ord("#"),"\n"; print "A * has ASCII value ", ord("*"),"\n";