Help for this page

Select Code to Download

Select or download this



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

Select or download this

      perl -e "print +(0,<ARGV>)[eval pop]" linenumber.txt 1,3..5