Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: RE: Permutations and combinations

by I0 (Priest)
on Apr 19, 2002 at 04:17 UTC ( #160432=note: print w/ replies, xml ) Need Help??


in reply to RE: Permutations and combinations
in thread Permutations and combinations

your sub swap can be written without $t:

sub swap { my ($i,$j) = @_; @a[$i,$j] = @a[$j,$i]; }


Comment on Re: RE: Permutations and combinations
Download Code
Re: Re: RE: Permutations and combinations
by AltBlue (Chaplain) on Apr 19, 2002 at 15:21 UTC
    lol, you bother to look upon this old piece of code :))

    heh, of course that your snippet is good, but a swap routine could be written even simpler:

    sub swap { reverse @_ }
    ... heh, it's not the case for that code thou, as the array is a global one :) cheers.

    --
    AltBlue.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (10)
As of 2014-12-26 18:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (174 votes), past polls