in reply to Moving sub-strings to the start of a line

I would do something like 

push @anchors, $1 while $html =~ s/(<a .*?>)//s;
$html = join '', @anchors, $html;

[download]

the lowliest monk

Replies are listed 'Best First'.
Re^2: Moving sub-strings to the start of a line
by GrandFather (Saint) on Jun 01, 2005 at 01:14 UTC
    Oh yes. I like that!

    My first question here and I get wonderfull answers almost before I finished asking.
[reply]

In Section Seekers of Perl Wisdom