my ($foo, $bar, $baz) = map "default", 1..3; $_="default" for my ($foo, $bar, $baz);