note
choroba
Using [doc://substr] and [doc://length]:<c>
my $s = "abcdefgh";
print "$s\n";
$s .= substr $s, length($s) - 2 * $_, 1 for 1 .. length($s) - 1;# Add the reversed string.
substr $s, 0, length($s) / 2, q(); # Remove the original string.
print "$s\n";
</c>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-832495">
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
</div></div>
1025122
1025122