math is hard (to remember)

cabney cabney at cyberpass.net
Thu Jul 12 23:59:57 CDT 2001


~sdpm~
On 12 Jul 2001, Randal L. Schwartz wrote:

> Here's one way that involves more recursion than iteration.  I've come
> up with ways that involve more iteration than recursion too. :)
[shnibble]

hmmm, something like this?? (this is very nice, thanks again. :)

=8<=======================================================
#! /usr/bin/perl -w

my @list = qw(red orange yellow green blue);

my @ans = combo(@list);
print "@{$_}\n" for @ans;

sub combo
{
	my $ret;
	while ( @_ )
	{
		my $this = shift;
		my @redo;
		for $done (@{$ret})
		{
			push @redo, [$this,@{$done}];
		}
		push @{$ret}, [$this], @redo;

	}

	return @{$ret};
}
=8<=======================================================

CA
-- 
There was a time
A wind that blew so young
For this could be the biggest sky
And I could have the faintest idea

~sdpm~

The posting address is: san-diego-pm-list at hfb.pm.org

List requests should be sent to: majordomo at hfb.pm.org

If you ever want to remove yourself from this mailing list,
you can send mail to <majordomo at happyfunball.pm.org> with the following
command in the body of your email message:

    unsubscribe san-diego-pm-list

If you ever need to get in contact with the owner of the list,
(if you have trouble unsubscribing, or have questions about the
list itself) send email to <owner-san-diego-pm-list at happyfunball.pm.org> .
This is the general rule for most mailing lists when you need
to contact a human.




More information about the San-Diego-pm mailing list