in reply to Incorrectly adding a newline character
while(<DATA>){ print "$1\t$2\t$2\n" if /\t(.+)\t(.+)$/; } __DATA__ a first street 1A b second street 2B c third street 3C d fourth street 4D [download]