gistfile1.txt

multi sub prompt (
  $prompt_str?,
# :a(  :$args       )  of Bool,
# :c(  :$complete   )  of Array|Hash|Str,
  :d(:$default)        of Str,
#--> :D(:$DEFAULT)        of Str,
# :e(  :$echo      )   of Str,
  :f(:$fail)           of Bool       = sub{False},
       :$in            of IO         = $*IN,
# :g(  :$guarantee )   of Hash       = hash{},
# :h(  :$history   )   of Str,
  :i(:$integer)        of Bool,
# :k(  :$keyletters )  of Bool,
# :l(  :$line       )  of Bool,
#-->   :$menu          of Any,
       :$must          of Hash       = hash{},
  :n(:$number)         of Bool,
       :$out           of IO         = $*OUT,
  :p(:$prompt)         of Str is copy,
# :r(  :$return     )  of Str,
#      :$stdio         of Bool,
# :s(  :$single     )  of Bool,
# :t(  :$timeout    )  of Bool,
  :v(:$verbatim)       of Bool,
  :w(:$wipe)           of Bool,
  :wf(:$wipefirst)     of Bool,
  :y(:$yes)            of Bool,
  :yn(:$yesno)         of Bool,
  :Y(:$Yes)            of Bool,
  :YN(:$YesNo)         of Bool,
  *%unexpected_options,
  *@prompt,
) { 
    say "sigh" 
}