perl -le '@x=(9,8,4,3,6,5); print ((sort @x)[0])'