> > I suppose you'll want me to put that on the CPAN now. ;-)
>
> Yes. Didn't we sponsor you for this ;-)
I hear and obey, O Mighty Sponsor!
Though I suspect I'll hold off until Larry makes A3 public. Then I'll
release a module that rearranges *all* the operators to their new Perl
6 bindings:
use Operators::Perl6ish;
package MyClass;
sub new { bless [$_[1], 1..10], $_[0] }
sub next { my ($self) = @_; return "next is: " ~ shift(@$self) ~ "\n" }
package main;
my ($str1, $str2) = ('a','z');
my $obj = MyClass.new($str1 ~ $str2);
print $obj.next() for 1..10;
print $obj.[0] ~ "\n";
my $next = 'next';
print $obj.$next;
#etc.
Damian