user
poj
<div style="font-family:courier;font-size:9">
<code>
# 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";
</code></div>
2024-03-23 12:33:30
17304
1038520
0
1939
UK - South West
&001;:
on