print qw(another just hacker perl)[$[-$_]for-1..2