Select Code to Download

% cat file_one
chr coord array value
...
...

21  400   60  2.345

perl -MMy::App -e 'merge( file_one=>\@cols_one, file_two=>\@cols_two )
+;