#!/usr/bin/env racket
#lang racket
; vim: ft=racket
(require smol-http)

(define req
  (make-http-req 'GET "/hello-world"))

(define (run-webcrawler username password)
  (printf "the credentials are: ~s ~s\n" username password)
  (write-http-msg req))

(module+ main
  (command-line
    #:program "webcrawler"
    #:args
    (username password)
    (run-webcrawler username password)))