(AndOr OP_AND_IF
  (FunctionDef _cpan2dist []
    (List
      (= scope=<EAssignScope.LOCAL 0> flags=0 words=[{[LIT_CHARS cur]}, {[LIT_CHARS prev]}, {[LIT_CHARS words]}, {[LIT_CHARS cword]}] bindings=[])
      (AndOr OP_OR_IF
        (Com {[LIT_CHARS _init_completion]}        )
        (Com {[LIT_CHARS return]}        )
      )
      (Case to_match={[VarSub prev]}, pat_word_list=[[{[LIT_CHARS --format]}], [{[LIT_CHARS --banlist]}, {[LIT_CHARS --ignorelist]}, {[LIT_CHARS --modulelist]}, {[LIT_CHARS --logfile]}]]
        (List
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('COMPREPLY', {[Array {[ComSub (Com {[LIT_CHARS compgen]} {[LIT_CHARS -W]} {[SQ <LIT_CHARS "$(perl -MCPANPLUS::Dist -e \\\n"> <LIT_CHARS "                \"print map { \\\"\\$_\\n\\\" } CPANPLUS::Dist->dist_types\")">]} {[LIT_CHARS --]} {[DQ [VarSub cur]]})]}]})])
          (Com {[LIT_CHARS return]} {[LIT_CHARS 0]}          )
        )
        (List
          (Com {[LIT_CHARS _filedir]}          )
          (Com {[LIT_CHARS return]} {[LIT_CHARS 0]}          )
        )
      )
      (If
        (DBracket {B2 BINARY_STRING_EQUAL {[DQ [VarSub cur]]} {[LIT_CHARS -] [LIT_OTHER "*"]}})
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('COMPREPLY', {[Array {[ComSub (Com {[LIT_CHARS compgen]} {[LIT_CHARS -W]} {[SQ <LIT_CHARS "$( _parse_help \"$1\" )">]} {[LIT_CHARS --]} {[DQ [VarSub cur]]})]}]})])
        (ElseTrue)
        (List
          (= scope=<EAssignScope.LOCAL 0> flags=0 words=[] bindings=[('cpandirs', {[Array {[DQ [VarSub HOME][LIT_CHARS /.cpanplus/]]} {[DQ [VarSub HOME][LIT_CHARS /.cpan/source/modules/]]}]})])
          (= scope=<EAssignScope.LOCAL 0> flags=0 words=[{[LIT_CHARS packagelist]}] bindings=[])
          (For dir [{[VarSub cpandirs bracket_op=(Index {A Atom NODE_ARITH_WORD {AS_OP_AT "@"}})]}])
            (AndOr OP_AND_IF
              (DBracket {B? LOGICAL_BINARY_AND {B1 UNARY_FILE_d {[DQ [VarSub dir]]}} {B1 UNARY_FILE_r {[DQ [VarSub dir][LIT_CHARS /02packages.details.txt.gz]]}}})
              (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('packagelist', {[DQ [VarSub dir][LIT_CHARS /02packages.details.txt.gz]]})])
            )
          )
          (AndOr OP_AND_IF
            (DBracket {B1 UNARY_STRING_n {[VarSub packagelist]}})
            (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('COMPREPLY', {[Array {[ComSub (Pipeline (Com redirects=[(FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2)]{[LIT_CHARS zgrep]} {[DQ [LIT_CHARS "^"][VarSub cur transform_ops=[PatSub {[LIT_CHARS -]} {[LIT_CHARS "::"]} do_all]]]} {[VarSub packagelist]}) (Com {[LIT_CHARS awk]} {[SQ <LIT_CHARS "{print $1}">]}) (Com {[LIT_CHARS sed]} {[LIT_CHARS -e]} {[SQ <LIT_CHARS "s/::/-/g">]}) )]}]})])
          )
        )
      )
    )
  )
  (Com {[LIT_CHARS complete]} {[LIT_CHARS -F]} {[LIT_CHARS _cpan2dist]} {[LIT_CHARS -o]} {[LIT_CHARS default]} {[LIT_CHARS cpan2dist]}  )
)