perl -le '@full = ( 0..100 ); for ( @full ) { print STDOUT "$_: LIGHTS ON" if /20/ .. /30/; print STDOUT "$_: LIGHTS OFF" if /60/ .. /70/; } ' __output__ 20: LIGHTS ON 21: LIGHTS ON 22: LIGHTS ON 23: LIGHTS ON 24: LIGHTS ON 25: LIGHTS ON 26: LIGHTS ON 27: LIGHTS ON 28: LIGHTS ON 29: LIGHTS ON 30: LIGHTS ON 60: LIGHTS OFF 61: LIGHTS OFF 62: LIGHTS OFF 63: LIGHTS OFF 64: LIGHTS OFF 65: LIGHTS OFF 66: LIGHTS OFF 67: LIGHTS OFF 68: LIGHTS OFF 69: LIGHTS OFF 70: LIGHTS OFF