User since: |
Dec 22, 2002 at 10:42 UTC
(18 years ago) |
Last here: |
Apr 03, 2021 at 10:25 UTC
(3 weeks ago) |
Experience: |
17206
|
Level: |
Abbot (19)
|
Writeups: |
1939
|
Location: | UK - South West |
User's localtime: |
Apr 21, 2021 at 12:27 UTC
|
Scratchpad: |
View
|
For this user: | Search nodes |
|
# program1.pl 17 March 2000
$phrase = '123';
print $phrase+1,"\n";
@home = ("couch","chair","table");
print $home[1],"\n";
%longday = ("Sun", "sunday", "Mon", "Monday");
print $longday{"Sun"},"\n";
|