> > 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


Reply via email to