Podcast #128: We chat with Kent C Dodds about why he loves React and discuss what life was like in the dark days before Git. Listen now.
5 added 92 characters in body
source | link

Perl, 47 45 4339 3933 bytes

@%=1..<>;$a=$_/$/,say map{$a==$_|0}@%for@%map$`==$_|0,@%for@%=1..<>

Thanks to Ton Hospel for saving 6 bytes

Running with the -E perlrun:

$ echo 3 | perl -E'@%=1..<>;$a=$_,say map{$a==$_|0}@%for@%'
100
010
001

Perl, 47 45 43 39 bytes

@%=1..<>;$a=$_,say map{$a==$_|0}@%for@%

Running with the -E perlrun:

$ echo 3 | perl -E'@%=1..<>;$a=$_,say map{$a==$_|0}@%for@%'
100
010
001

Perl, 39 33 bytes

/$/,say map$`==$_|0,@%for@%=1..<>

Thanks to Ton Hospel for saving 6 bytes

Running with the -E perlrun:

$ echo 3 | perl -E'@%=1..<>;$a=$_,say map{$a==$_|0}@%for@%'
100
010
001
4 added 2 characters in body
source | link

Perl, 47 45 4343 39 bytes

@a=1@%=1..<>;for(@a){$a=$_;say<>;$a=$_,say map{$_==$a|0}@a$a==$_|0}@%for@%

Running with the -E perlrun:

$ echo 3 | perl -E'@a=1E'@%=1..<>;for(@a){$a=$_;say<>;$a=$_,say map{$_==$a|0}@a$a==$_|0}'@%for@%'
100
010
001

Perl, 47 45 43 bytes

@a=1..<>;for(@a){$a=$_;say map{$_==$a|0}@a}

Running with the -E perlrun:

$ echo 3 | perl -E'@a=1..<>;for(@a){$a=$_;say map{$_==$a|0}@a}'
100
010
001

Perl, 47 45 43 39 bytes

@%=1..<>;$a=$_,say map{$a==$_|0}@%for@%

Running with the -E perlrun:

$ echo 3 | perl -E'@%=1..<>;$a=$_,say map{$a==$_|0}@%for@%'
100
010
001
3 added 8 characters in body
source | link

Perl, 47 4545 43 bytes

@a=1..<>;for(@a){$a=$_;say map{$_==$a?1:0$_==$a|0}@a}

Running with the -E perlrun:

$ echo 3 | perl -E'@a=1..<>;for(@a){$a=$_;say map{$_==$a?1:0$_==$a|0}@a}'
100
010
001

Perl, 47 45 bytes

@a=1..<>;for(@a){$a=$_;say map{$_==$a?1:0}@a}

Running with the -E perlrun:

$ echo 3 | perl -E'@a=1..<>;for(@a){$a=$_;say map{$_==$a?1:0}@a}'
100
010
001

Perl, 47 45 43 bytes

@a=1..<>;for(@a){$a=$_;say map{$_==$a|0}@a}

Running with the -E perlrun:

$ echo 3 | perl -E'@a=1..<>;for(@a){$a=$_;say map{$_==$a|0}@a}'
100
010
001
2 added 8 characters in body
source | link
1
source | link