geuma@geuma:~$ perl -e 'for (1..5) { print "$_\n" };'
1
2
3
4
5

##</code><code>##

geuma@geuma:~$ perl -e 'for (5..1) { print "$_\n" };'