#!/usr/bin/perl

=head1 NAME

changecities.pl -- analyze DB changelog to substitute cities

=head1 SYNOPSIS

changecities.pl B<-c> ChangeLog -d <directory>

=head1 DESCRIPTION

The program looks at all html files in the I<directory> and substitutes 
C<tour=oldcity> by C<tour=newcity> for each line like
  oldcity -> newcity

in the ChangeLog

=back 4

=item B<-c> ChangeLog

Location of the ChangeLog file

=item B<-d> directory

Directory of html files

=over

=head1 AUTHOR

Boris Veytsman

=head1 $Id: changecities.pl,v 1.1 2000/10/17 15:05:48 boris Exp $

=cut