2 lines
84 B
Perl
2 lines
84 B
Perl
use ntheory "factor";
|
|
print join(" ", grep { scalar factor($_) == 2 } 1..100),"\n";
|
use ntheory "factor";
|
|
print join(" ", grep { scalar factor($_) == 2 } 1..100),"\n";
|