in reply to assigning a value to several vars

Or, 

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

[download]

After Compline,
Zaxo

In Section Seekers of Perl Wisdom