[perl #112584] Passing command line options to “perl6” causes the USAGE automatic generation to print an incorrect program name

[via RT]

# New Ticket Created by  spider-mario 
# Please include the string:  [perl #112584]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=112584 >


Assuming `test-case.pl` contains the following code:

    use v6;
    sub MAIN(Str $parameter) {}

then:

$ perl6 --stagestats test-case.pl

produces:

[…]
Usage:
  --stagestats <parameter>

The program name is incorrectly reported to be “--stagestats”.