>>276
% perl -e 'print +(reverse(1,2,3,4,5))[0..2], "\n"'