http://www.perlmonks.org?node_id=178196


in reply to (jeffa) Re: Reverse Function
in thread Reverse Function

jeffa's answered the question, but , to indulge in a little golf, it can be done in one line : 
print reverse map {s/oldpage/newpage/g; $_} <DATA>;

[download]

Replies are listed 'Best First'.
Re: Re: Re: Reverse Function
by Kanji (Parson) on Jun 29, 2002 at 09:01 UTC

    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.


[reply]
[d/l]
    A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom