You're almose there, just add a one after that comma after $p. The splice would then look like this:

splice @picturelist, $p, 1;
[download]

The 1 in the above splice is used as a length; it tells how many elements to delete. To learn more about splice, just click one of the multiple links in the above paragraph.

Update: Well, I was concentrating on your syntax, tachyon provides a much more idiomatic answer; I'd go with his if I were you

The 15 year old, freshman programmer,
Stephen Rawls