print join(" ", map{ vec( $vec, $_, 4) } 0 .. 99);