in reply to (jeffa) Re: Reverse Functionin thread Reverse Function
print reverse map {s/oldpage/newpage/g; $_} <DATA>; [download]
Well, if you're gonna golf... ;^)
s/oldpage/newpage/g, print for reverse <DATA>; # 46 s/oldpage/newpage/g,print for reverse<DATA> # 43 [download]
--k.