myneu.rkt

#lang racket

(require net/url net/uri-codec)
(define url:string "https://myneu.neu.edu/cp/home/login")
(define the-url (string->url url:string))
(define ip (post-pure-port 
            the-url             
            (string->bytes/utf-8
             (alist->form-urlencoded '((user . "me") (pass . "my_password"))))
            empty))
(port->string ip)