#!/usr/bin/perl
use strict;
my ($ISSUE,$PAGE) = split(/~/,$ENV{QUERY_STRING});
my $url = "http://www.electricferret.com" . $PAGE;
print ("Location: $url\n"); 
print ("Content-type: text/html\n\n");