Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- shadowm@nanacore:~/src/wesnoth% perl -e '@foo = (0,1,2,3,4); $bar = 0; print join(" ",@foo[$bar, ++$bar])."\n";'
- 1 1
- shadowm@nanacore:~/src/wesnoth% perl -e '@foo = (0,1,2,3,4); $bar = 0; print join(" ",@foo[$bar++, $bar])."\n";'
- 0 1
Advertisement
Add Comment
Please, Sign In to add comment
