Re: min $#a, $#b

Most likely a List::Util issue. When you replace the min definition with

sub min { my ($a, $b) = @_; $a < $b ? $a : $b }

it works correctly.

Check the tracker if it's reported. I think it could be rt://107970. Perl $#arr is done with magic:

$ perl -MDevel::Peek -e 'my @a = (); Dump $#a;'
SV = PVMG(0x1034280) at 0xfe1cb8
  REFCNT = 1
  FLAGS = (GMG,SMG)
  IV = 0
  NV = 0
  PV = 0
  MAGIC = 0x1003260
    MG_VIRTUAL = &PL_vtbl_arylen
    MG_TYPE = PERL_MAGIC_arylen(#)
    MG_OBJ = 0x1000658

Comment on Re: min $#a, $#b > $#b Select or Download Code

Replies are listed 'Best First'.
Re^2: min $#a, $#b > $#b by Eily (Monsignor) on Jan 13, 2016 at 08:50 UTC
Thanks, this does look like a probable cause.	[reply]
Re^2: min $#a, $#b > $#b by ikegami (Patriarch) on Jan 15, 2016 at 20:29 UTC
Perl $#arr is done with magic: Only when used as an lvalue. Workaround: `0+$#a`.	[reply] [d/l]