Re: Perl Weekly Challenge 206 -- oneliner

..as always for my own fun, the second task is easy using a hash with expected values as keys and values incremented for expected args $ARGV[0]..$ARGV[-1] and for actual args @ARGV so a key with a value of 1 is a missing number and a key with a value of 3 is a duplicate. If nothing of this happens return -1

perl -E "map{$h{$_}++}$ARGV[0]..$ARGV[-1],@ARGV;map{$h{$_}==3?$r.=' Du
+plicate is '.$_:$h{$_}==1?$r.=' Missing is '.$_:''}keys%h;say $r||-1"
[download]

UPDATE ..oops! yes LanX is right I jumped to 208, sorry.

There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.

Comment on Re: Perl Weekly Challenge 206 -- oneliner Select or Download Code

Replies are listed 'Best First'.
Re^2: Perl Weekly Challenge 206 -- oneliner by LanX (Saint) on Mar 20, 2023 at 11:13 UTC
that's an answer to challenge 206 task 2 ? I provided a test-suite in my OP, not sure how best to generalize it to fit for one-liner too. (probably by shelling out?) update did you skip to 208? Cheers Rolf _{(addicted to the 𐍀𐌴𐍂𐌻 Programming Language :) Wikisyntax for the Monastery}	[reply]

update