begin{@v=[]} @v = append(@v, NR); $v=@v
