#lang racket

;; Str [Listof Str] ->
;; Router main
(define (run-router asn ip-addrs)
  (displayln asn)
  (map displayln ip-addrs)
  (void))

(module+ main
    (command-line
     #:program "router"
     #:args
     (asn . ip-addrs)
     ;; Run the router
     (run-router asn ip-addrs)))