# Digits separated by more than
# one dot become strings
print 72.101.108.108.111.32.119.111.114.108.100.33.10.13;
# Same as
print map chr($_),
(72, 101, 108, 108, 111, 32, 119, 111, 114, 108, 100, 33, 10, 13);
Hello World!
|
# A v followed by digits (optionally)
# separated by dots, become strings
my $a = v65;
print $a, "\n";
print $a, v66.67, "\n";
A
|