Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Getting combinations from a number's digits

by ioannis (Vicar)
on Jul 10, 2006 at 00:55 UTC ( #560041=note: print w/ replies, xml ) Need Help??


in reply to Getting combinations from a number's digits

This solution is based on the combinational powers of glob()

my $txt = '123'; local $"=','; my @array = glob( "{@{[ split(//,$txt)]}}" x length($txt) ); print Dumper \@array ;


Comment on Re: Getting combinations from a number's digits
Download Code
Replies are listed 'Best First'.
Re^2: Getting combinations from a number's digits
by Zaxo (Archbishop) on Jul 10, 2006 at 01:28 UTC

    That glob will also produce 111, 122, etc. Combinations without replacement are needed.

    After Compline,
    Zaxo

Re^2: Getting combinations from a number's digits
by mikasue (Friar) on Jul 10, 2006 at 01:13 UTC
    um... I learned something. glob() is an actual module. I thought you were using it like we use blah or foo. Thanks, but does this use of glob create the 6 combinations for him? It seems the 6 combinations are hardcoded and he just want to store them somewhere for later use.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://560041]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (11)
As of 2015-07-31 00:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (274 votes), past polls