| User since: |
Dec 22, 2002 at 10:42 UTC
|
| Last here: |
May 22, 2013 at 15:21 UTC
(13 hours ago) |
| Experience: |
2177
|
| Level: |
Chaplain (11)
|
| Writeups: |
180
|
| Location: | UK - South West |
| User's localtime: |
May 23, 2013 at 04:08 UTC
|
| Scratchpad: |
None.
|
|
# 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";
|