Get the app

CD · 2000

(while)

Fällt F.0014 · 2000 · Ireland

4.38(8 ratings)

ElectronicGlitchIDMExperimental

47Have

37Want

15Tracks

Discogs marketplace1 for sale from $7.92

CD · Mini · Limited Edition

Tracklist

15 tracks

1

#!/usr/bin/perl

1:03
2

$power = 8;

1:03
3

sub fission {

1:02
4

fork

1:02
5

or $child = 1;

1:02
6

$power-- if $child;

1:02
7

if ($child) {exit unless --$power}

1:02
8

return $child; }

1:02
9

while (not &fission) {

1:02
10

print 0;

1:02
11

bomb:

1:02
12

while (&fission)

1:02
13

{ print 1 }

1:02
14

}

1:02
15

goto 'bomb';

1:00