note
Tanalis
Probably not the best way to do it, but this works:
<code>
my $a = "ABABA";
my $b = "BB--B-BB";
$b =~ s/B/\%c/g;
printf $b, unpack 'c*', $a;
</code>
Gets rid of the loop, at least *grin*.
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-189756">
<P>-- [189756|Foxcub]
<BR><TT>#include [http://www.liquidfusion.org.uk|www.liquidfusion.org.uk]
</TT></P>
</div></div>
476824
476824