string parsing with perl and regex

the job needs to be done to work with an existing perl code. I have a scalar; when printed, its shows one or more groups of 3 lines; a white line separates the groups. As an example, for this job, lets say it has one group EUR/USD buy at 1.3199 TP: 1.3239 SL: 1.3161 EUR/USD sell at 1.3161 TP: 1.3121 SL: 1.3199 Take profit: 40 pips EUR/USD can be any 3_letters/3_letters and the real number can be any real number. Buy and sell can be sell and buy or buy and buy or sell and sell I want to have the info in the same or a different scalar (if printed) to look like this: Entry order buy EUR/USD at 1.3199 TARGET 1 1.3239, TARGET 2 X, TARGET 3 Y. Recommended STOP: 1.3161 Entry order sell EUR/USD at 1.31 TARGET 1 1.3239, TARGET 2 M, TARGET 3 N. Recommended STOP: 1.3199 So each input group will produce 2 output groups 2 lines each. X = entry price 1.3199 + 80 pips Y = entry price 1.3199 + 150 pips M = entry price 1.3199 - 80 pips N = entry price 1.3199 - 150 pips Adding pips is not like adding in math, 80 above means 0.0080 and 150 above means 0.0150 Here is another example for pips math entry price 120.99 + 80 pips, 80 means 0.80 entry price 0.9891 + 150 pips, 150 means 0.0150 entry price 47.07 - 150 pips, 150 means 1.50 the values 80 and 150 are fixed and will not change.