************************************************************************
* In each input line, this program replaces the first instance of a
* lesser village ending with the more prestigous 'ville' and then 
* prints the new name with New in front
* The default for input processing is to read from standard input
* To run this program and use the input after the end statement as
* the input, use:
*   snobol4 -r ville.sno
************************************************************************
        oldForm = 'burg' | 'ton' | 'town' | 'port'
        newForm =  'ville'
top     place = input	                     :f(end)
        place  oldForm = newForm   
        output = 'New ' place	             :(top)
end
Millersburg
Allentown
Hamburger
Williamsport