for ( @Input ) { $State = ( ( /$Start/ .. /$Finish/ ) && ! /$Finish/ ); ($State) ? do_this() : do_that; }