perl -e "BEGIN{$w=pop @ARGV}print +(0,<ARGV>)[eval $w]" linenumber.txt 1,3..5