Implement --earlyexpunge option.

Fixes #1071
Hmm, so this is pretty confusing because of the double negative.

How about:

die... if $opts->{earlyexpunge} && ! $LJ::IS_DEV_SERVER?