perl -e " foreach (1..$ARGV[0]){ print qq($_\n) if $_ == 5 .. $_==7}  " 15

5
6
7