Something

CL-USER> (require 'asdf-install)
("SB-EXECUTABLE" "ASDF-INSTALL")
CL-USER> (asdf-install:install 'getopt)
Install where?
1) System-wide install: 
   System in /usr/lib/sbcl/site-systems/
   Files in /usr/lib/sbcl/site/ 
2) Personal installation: 
   System in /home/anthony/.sbcl/systems/
   Files in /home/anthony/.sbcl/site/ 
 --> 2


Backtrace:
  0: (READ-LINE #<SB-SYS:FD-STREAM for "a constant string" {912F7E9}> T NIL #<unused argument>)
  1: (ASDF-INSTALL::URL-CONNECTION "http://files.b9.com/getopt/getopt-latest.tar.gz")
  2: (ASDF-INSTALL::DOWNLOAD-FILES-FOR-PACKAGE "GETOPT" #P"/home/anthony/GETOPT.asdf-install-tmp")
  3: ((LABELS ASDF-INSTALL::ONE-ITER) (GETOPT))
  4: (ASDF-INSTALL:INSTALL GETOPT)
  5: (ASDF-INSTALL:INSTALL)
  6: (SB-INT:EVAL-IN-LEXENV (ASDF-INSTALL:INSTALL (QUOTE GETOPT)) #<NULL-LEXENV>)
  7: (SWANK::EVAL-REGION "(asdf-install:install 'getopt)