perl -Sd scriptname -scriptoptions scriptarguments
      DB<1> h h
      DB<2> |h