#!/usr/bin/perl
#
# Vana koore ümbersuunaja
#

use CGI qw/:standard/;
my $input = new CGI;

$page = $input->param('page');

if ($page =~ /dictionary/i) {$location = qq(http://aare.pri.ee/dictionary.html);}
else {$location = "/";}


print qq(Location: $location\n\n);