binomiaalcoëfficiënt binaire output Perl

[ToFast]

Is het mogelijk om in Perl een binaire output (10 boven 5) te krijgen zoals in onderstaande:

(volgorde van de rij is niet belangrijk)
1111100000
1111010000
1110110000
1101100000
1011100000
0111100001
0011100011
....etc
1010101010
...etc

Ik zit in de richting, maar volgens mij moet ik alles omgooien.

Perl: output.pl

use strict; 
use warnings;

my $count = 0;
my $range = 2; 
my @random_number;

for (my $i=0; $i<10; $i++){
  $random_number[$i] = int (rand ($range));
}  

foreach (@random_number){
  $count += $_;
}
  
print "Aantal enen: $count \n"; 
print @random_number;