Re^2: min $#a, $#b


XP is just a number
	PerlMonks

Re^2: min $#a, $#b > $#b

by Crackers2 (Parson)

on Jan 12, 2016 at 20:47 UTC ( [id://1152608]=note: print w/replies, xml )

Need Help??

in reply to Re: min $#a, $#b > $#b
in thread min $#a, $#b > $#b

Adding scalar seems to fix it..

use List::Util qw( min );
my @one = (1);

for my $_in (1..5) 
{ 
  push @_x, "$_in";
  my $x_max = min scalar($#_x), $#one;
  print "SET my \$x_max $x_max = min \$#_x $#_x, \$#one $#one;\n";
}

SET my $x_max 0 = min $#_x 0, $#one 0;
SET my $x_max 0 = min $#_x 1, $#one 0;
SET my $x_max 0 = min $#_x 2, $#one 0;
SET my $x_max 0 = min $#_x 3, $#one 0;
SET my $x_max 0 = min $#_x 4, $#one 0;
[download]

Though I don't quite understand why. Real bug perhaps?

Comment on Re^2: min $#a, $#b > $#b Download Code

Replies are listed 'Best First'.
Re^3: min $#a, $#b > $#b by Eily (Monsignor) on Jan 13, 2016 at 08:55 UTC
Actually anything that will initiate a new value instead of just forwarding the current one will work (like adding quotes around the variable, 0+$var, or even scalar($var), though I wasn't actually expecting this one), because the new value won't have the same magic. I did think about forcing a copy of some variables (which explains the quotes in some parts of my code), but since I had been working on the issue for a while (I started with much bigger code, I reduced it trying to find the bug), I wasn't sure at the time of my post whether I was doing some kind of silly mistake, and I never thought about forcing the copy on the parameters of min. Thanks for the answer !	[reply]
Re^3: min $#a, $#b > $#b by FreeBeerReekingMonk (Deacon) on Jan 12, 2016 at 21:11 UTC
yup, real bug. happens in v5.20.2	[reply]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1152608]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others lurking in the Monastery: (2)

As of 2024-04-18 23:50 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found