perl -e'\$a[0]'
perl -e'\$a[-1]'