Amazing! ++

Of course, you can even make it 52 with a minor change ...

$o=1;{print$_[@_]=$o.$"if++$o,!grep!($o%$_),@_;redo}
[download]