my ($n3, $n5, $n9) = ( sub() )[2,4,8];