Re: [FWP] Towers of Hanoi

[Michael Assels <mjassels@cs.concordia.ca>]

	       On Thu, 14 Sep 2000 22:21:21 EDT,
			    abigail wrote:

<quote>
%0=map{reverse+chop,$_}ABC,ACB,BAC,BCA,CAB,CBA;$_=shift().AC;1while+s/(\d+)((.)
(.))/($0=$1-1)?"$0$3$0{$2}1$2$0$0{$2}$4":"$3 => $4\n"/xeg;print#Towers of Hanoi
</quote>

Now THAT's a pickup line!

Michael

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe