Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re (tilly) 6: (Golf as well): List of Partitions

by tilly (Archbishop)
on May 07, 2001 at 15:35 UTC ( #78476=note: print w/ replies, xml ) Need Help??


in reply to Re: Re (tilly) 4: (Golf as well): List of Partitions
in thread (Golf as well): List of Partitions

Here is what I mean by commified. Consider the following 2 versions of the same map statement:

...map{"@$_\n"}@a... ...map"@$_\n",@a...
The first form is more general, you can put more complex logic inside the block. The second form replaces the block with a comma and shaves a character. Often you can shave a few characters off of someone's solution by seeing that a few map's or grep's can switch over to the version with the comma.

Sometimes it is not obvious that you can. So sometimes I just have to try it out. As in the case:

...map{$$_[0]>$i?():[$i,@$_]}P($n-$i)... ...map$$_[0]>$i?():[$i,@$_],P($n-$i)...
Incidentally the following version is the same size, but has slightly nicer (IMHO) output:
sub P{ my$i=pop;[$i],map{--$i;map$$_[0]>$i?():[$i,@$_],P($_-1)}2..$i }


Comment on Re (tilly) 6: (Golf as well): List of Partitions
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2014-12-26 03:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

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





    Results (164 votes), past polls