#!/usr/bin/perl

print "Status: 302 Moved Temporarily\r\n" .
      "Location: /cgi-bin/wmail/wmail.pl\r\n" .
      "\r\n";