Re: Making join() respect string-concat operator

On Tue, Jun 11, 2019 at 7:22 AM Dave Mitchell <davem@iabyn.com> wrote:
> I'm not sure I follow. "$foo" calls '""' overloading, not '.':

Sorry, my example had one too few arguments:

alh@hyrule:~$ perl
   use overload
        '""' => sub { print "STRFY($_[0][0])\n"; $_[0][0] },
        '.'  => sub { print "CONCAT$_[0][0], $_[1][0])\n";
                        bless [ $_[0][0] . $_[1][0] ] }
        ;

    my $s = bless [ "foo" ];
    my $t = "$s $s";
CONCATfoo, )
CONCATfoo, foo)

-- Matthew Horsfall (alH)

• Making join() respect string-concat operator by Paul "LeoNerd" Evans
• Re: Making join() respect string-concat operator by Dave Mitchell
• Re: Making join() respect string-concat operator by wolfsage
• Re: Making join() respect string-concat operator by Paul "LeoNerd" Evans
• Re: Making join() respect string-concat operator by David Nicol
• Re: Making join() respect string-concat operator by Richard Leach
• Re: Making join() respect string-concat operator by Dan Book
• Re: Making join() respect string-concat operator by Dave Mitchell
• Re: Making join() respect string-concat operator by wolfsage
• Re: Making join() respect string-concat operator by Dave Mitchell