perl -wle "use 5.10.0;   say abs foreach (-5..5) ;"
5
4
3
2
1
0
1
2
3
4
5