6 lines
121 B
Perl
6 lines
121 B
Perl
#!/usr/bin/perl -w
|
|
|
|
print "A # has ASCII value ", ord("#"), "\n";
|
|
print "A * has ASCII value ", ord("*"), "\n";
|
|
|
|
|