print redirect ( cookie => $Cookie, uri => $URL );

##</code><code>##

  print redirect ( -cookie => $Cookie, -uri => $URL );

##</code><code>##

    print p, startform,
      table ( { border => 1, cellspacing => 0, cellpadding => 2 },
        Tr ( th ( "UserID:" ), td ( textfield ( USERID ) ),
          td ( { rowspan => 2 }, submit ( "Login" ) ) ),
        Tr ( th ( "Password:" ), td ( password_field ( PASSWORD ) ) ) ),
      endform;