#!/usr/bin/env perl# This CGI tries to do as little as possible. A URL is passed from the languages# dropdown form generated in /include/foot.wmi and the client is redirected to that pageuse CGI qw(:standard);my $lang = param('Language');print "Status: 302 Moved\nLocation: /$lang\n\n";