$min[$i] = $max[$i] = $emax[$i] = $len;

##</code><code>##

($min[$i], $max[$i], $emax[$i]) = ($len) x 3;

##</code><code>##

$_ = $len for $min[$i], $max[$i], $emax[$i];