Re: Popping from method that returns a list in one line

in reply to Popping from method that returns a list in one line

perl v5.20.2:

use strict; use warnings; # yadda yadda
use 5.10.0;
sub foo { my $ary = [1..10]; $ary }
my $o = bless \do {my $x};
say "this: ", pop @{$o->foo};
__END__
this: 10
[download]

also:

use strict; use warnings; # yadda yadda
use 5.10.0;
sub foo { (1..10) }
my $o = bless \do {my $x};
say "this: ", pop @{[$o->foo]};
__END__
this: 10
[download]

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'

Comment on Re: Popping from method that returns a list in one line Select or Download Code

In Section Seekers of Perl Wisdom