$ perl -ne'print if 10 .. 20' somefile
$ perl -ne'print if 40 .. /foo/' somefile
$ perl -ne'print if /foo/ .. /bar/' somefile