факторизация и квантовые вычисления и пр.

не расценивайте пожалуйста как саморекламу и пр.(мне это уже не интересно), наткнулся на http://www.cpan.org на 2 модуля реализующие квантовые вычисления, настолько понравилось, что перевел полтора мануала(все это дело под юникс). Там и умножение и факторизация и пр. и пр. А вообще автор этого модуля собирается писать книжку про эти все квантовые штуки. Запостил мессадж на случай, если кого заинтересует.

http://genphys.phys.msu.su/~dmitriy/perl/files/quantium.shtml

правда алгоритм Эратосфена для выявления простых чисел вроде быстрее работает:

$N = 1000000;

@L = (1) x $N;

$L[0] = 0; $L[1] = 0;

$start = 2;
$t0 = time;
while($start<$N) {
if($L[$start]==0) { $start++; next; }
for($i=$start*2;$i<$N;$i+=$start) { $L[$i] = 0; }
$start++;
}
print "time: ".(time-$t0)."\n";

for($i=0;$i<$N;$i++) {
print $i." " if($L[$i]==1);
}