perl -e '$x[0] = []; push $x[0], 1' [download]
perl -e 'push $x[0], 1' [download]
In reply to Re^3: convert rows to columns by choroba in thread convert rows to columns by b00mIR