codepad
[
create a new paste
]
login
|
about
Link:
http://codepad.org/RWpnv8zz
[
raw code
|
output
|
fork
]
skeletonkey
-
Perl
,
pasted on Oct 12:
1
2
3
my
@items
=
qw(1 2 3 4 5)
;
pop
(
@items
);
print
"$_\n"
for
@items
;
Output:
1
2
3
4
1 2 3 4
Create a new paste based on this one
Comments: