Skip to content

Instantly share code, notes, and snippets.

View mudler's full-sized avatar

Ettore Di Giacinto mudler

1.5k followers · 32 following
View GitHub Profile
@mudler
mudler / prime.pl
Created June 6, 2014 20:55
prime numbers with vec in perl
#!/usr/bin/perl
use strict;
use warnings;
use constant MAX => 100;
my $sieve = '';
vec($sieve, MAX, 1) = 0;
$sieve = ~$sieve;