in reply to Re: Spoiled by Perl
in thread Spoiled by Perl

var sorted = somelist.OrderBy(x => x.Foo());

[download]

But yeah, the woke butterfly that killed Perl wins on character count. The twenty years of waiting "paid off".

Jenda
1984 was supposed to be a warning,
not a manual!

Replies are listed 'Best First'.
Re^3: Spoiled by Perl
by holli (Abbot) on Dec 15, 2021 at 22:04 UTC
    The twenty years of waiting "paid off".
    Yes. Indeed it has. Check out this Raku code of mine which is a solution for this years day 14. Any experienced programmer should be able to make sense of, and mostly understand it after spending 2 hours with the docs. I doubt the same is true for any perl implementation of similar brevity. 
    my ( \o, \r ) =
    .head.comb.List,
    .tail.comb( /\w/ ).map( -> $a, $b, $c { "$a$b" => [ "$a$c", "$c$b"
+ ] } ).Hash
        with cache $*IN.slurp.split: "\n\n";

sub day14( \n )
{
    my %d = o.rotor( 2 => -1 )».join.Bag;
       %d = [(+)] %d.map({ r.{.key} »=>» .value }) for ^n;

    .Bag.values.minmax.elems - 1
        with ( o.tail => 1, |%d ).map: {
            .key.comb[0] => .value
        };
}

say day14 10|40;

    [download]


    holli

    You can lead your users to water, but alas, you cannot drown them.
[reply]
[d/l]

      Indeed it has, if the task was to destroy Perl.

      Also ... in an attempt to improve Perl's reputation of write-only line-noise language we ended up with this. Something somewhere along the way went terribly wrong. What makes you think an experienced programmer would want to waste two hours of his time with the docs? A "cute" infantile butterfly?

      Jenda
      1984 was supposed to be a warning,
      not a manual!

[reply]
Re^3: Spoiled by Perl
by ikegami (Patriarch) on Dec 07, 2021 at 21:33 UTC

    Nice. Complete version: 

    var sorted = someList.OrderBy( _ => _.Foo ).ThenBy( _ => _.Bar );

    [download]

    I think the above is produced by the following: 

    var sorted =
   from item in someList
   orderby item.Foo, item.Bar
   select item;

    [download]
[reply]
[d/l]
[select]

In Section Meditations