Re^2: Better way of writing "find the missing number" -- oneliner

ah! given the above task the oneliner is much simpler!


perl -E "@ar=(1..3,5,6,7);$h{$_}++for$ar[0]..$ar[-1];delete$h{$_}for@a
+r;print keys %h"

4
[download]

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^2: Better way of writing "find the missing number" -- oneliner Download Code

Replies are listed 'Best First'.
Re^3: Better way of writing "find the missing number(s)" -- oneliner by tybalt89 (Monsignor) on Apr 04, 2017 at 07:50 UTC
Slices, slices... `perl -E '\@h{1..(@a=(1..3,5,6,7))+1};delete@h{@a};say%h'` [download]	[reply] [d/l]
Re^3: Better way of writing "find the missing number" -- oneliner by salva (Canon) on Apr 04, 2017 at 07:50 UTC
hey, let's play golf! `perl -e'$_>++$i&&die"$i\n"for 1..3,5,6,7'` [download]	[reply] [d/l]
Re^3: Better way of writing "find the missing number" -- oneliner by tybalt89 (Monsignor) on Apr 04, 2017 at 08:44 UTC
Or an array version. `perl -E '@b=0..(@a=(1..3,5,6,7))+1;@b[0,@a]="";say@b'` [download]	[reply] [d/l]