If you know the delimiter between the two columns and its fixed, you can use the "split" method in perl to extract the column values as follows:
Now the array "arr" contains all column values in 1 line of the file. Then you can print
.
More can be elaborated on this if you specify the exact format of the file.
Please go through perl documentation of split. That will make things far more clear.