Stunning! ++

But you realize, of course ...

#!/usr/bin/perl -l
$o=1;{(grep!($o%$_),2..$o++)||print$o;redo}
[download]

That's 43.

It's a little slower (but then we sacrificed speed a while back ;-))

Update:  Make that 42 ...

#!/usr/bin/perl -l
$o=1;{grep!($o%$_),2..$o++or print$o;redo}
[download]