I don't know about Perl6, but you can derive a percentage of progress for Pugs pretty easily, simply by looking at the first two numbers in Pugs versions. We are currently at 6.2.x (1st milestone), approaching 6.28.0 (2nd milestone), out of six milestones (6.283185.0), so I'd say we're between 1/6 and 2/6 there, or maybe around 30%.
Considering that it took us 211 days to reach here, it's easy to derive that there are 492 more days to go. Obviously, with your help, we can reach there sooner still. :-)