Am Donnerstag, 18. Januar 2007 21:58 schrieb Matt Diephouse:
> ~/Projects/parrot mdiep$ cat test.pir
> .sub main :main
> null $P0
> multi($P0) # should print "Any\n"
> .end
>
> .sub multi :multi(String)
> say "String"
> .end
>
> .sub multi :multi(_)
> s
# New Ticket Created by Matt Diephouse
# Please include the string: [perl #41291]
# in the subject line of all future correspondence about this issue.
# http://rt.perl.org/rt3/Ticket/Display.html?id=41291 >
The example says it all.
--
Matt Diephouse
~/Projects/parrot mdiep$ cat test.pir