Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: Binomial Golf

by tachyon (Chancellor)
on May 31, 2001 at 06:00 UTC ( #84433=note: print w/replies, xml ) Need Help??


in reply to Binomial Golf

Damn, drat, blast, gadzooks, foiled again. MeowChow not only comes up with a similar method but beats me by 4 charachters to boot!!! Using the true return from print to add a '1' to the array is really clever coding MC.

tachyon

&b(10); &binomial(10); # my simple sub sub binomial { for(0..pop){ my $last = 0; for (@_){ my $temp = $_; $_ += $last; $last = $temp; } push@_,1; print"@_\n"; } } # my golf progression sub b { #map{my$l;map{$t=$_;$_+=$l;$l=$t}@_;push@_,1;print"@_\n"}0..pop; #map{my$l;map{($l,$_)=($_,$_+$l)}@_;push@_,1;print"@_\n"}0..pop; #map{print"1 @_\n";push@_,map{$_+pop}@_,1}0..pop map{print"1 @_\n";@_=map{$_+pop}@_,1}0..pop } $\=$"; sub AUTOLOAD{@_ =caller();print shift} { package Back; ::()} { package To; &::() } { package The; &::() } { package Drawing;&::} { package Board; ::()}

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://84433]
help
Chatterbox?
[LanX]: I think it's a flag problem ... I'll produce a reprodocable example for SOPW
[Corion]: "flag problem" to me sounds like "contains UTF-8 bytes but was never properly decoded to an UTF-8 string"
[LanX]: not my code ...
[choroba]: yeah, sounds like one of the strings is not flagged as UTF-8
[choroba]: which usually means its input wasn't handled correctly
[Corion]: choroba: Yeah, I think that would be the good solution
[LanX]: I suspect the first string which comes from the DB ...
[LanX]: ... but this part is already in production for a year now
[Corion]: LanX: The "good" approach here would be to use the appropriate DBI parameters to make the driver decode strings properly. But that will have a ripple-on effect of messing up all the places where manual decoding happens ;)
[LanX]: which means albeit being broken UTF8 it'll be handled correctly

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (11)
As of 2017-01-16 13:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (150 votes). Check out past polls.