Help for this page
@list=(@a,@default)[0..$#default];
@list=map {$_>$#a ? $default[$_] : $a[$_] } 0..$#default;