perl -le '@arr = 10..19; print $arr[int rand@arr]'