in reply to Re^2: how to append 2 lines
in thread how to append 2 lines

Ok, but that is only DATA, that is not perl