use Math::Prime::Util qw/forprimes/;
forprimes { say } 1000;  # optionally takes range a,b