|
|
|
| Perl-Sensitive Sunglasses | |
| PerlMonks |
Re: Replacing stringsby SamCG (Hermit) |
| on Apr 25, 2006 at 20:52 UTC ( [id://545641]=note: print w/replies, xml ) | Need Help?? |
|
I suggest this node on asking questions effectively. Unless tanktalus really has hit on your basic issue, in which case, congratulations on your economy of means (though I still think you'd be well-served by making your question more explicit).
----------------- s''limp';@p=split '!','n!h!p!';s,m,s,;$s=y;$c=slice @p1;so brutally;d;$n=reverse;$c=$s**$#p;print(''.$c^chop($n))while($c/=$#p)>=1;
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||