Here's a Windows version for ya' (sans golfing)

C:\chas_sandbox>perl -le "X:for(my$x=1;;){$x%$_||next(X)for(2..$x++);p
+rint$x}"
[download]