#!/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 page
 use CGI qw(:standard);
 my $lang = param('Language');
 print "Status: 302 Moved\nLocation: /$lang\n\n";