$ perl -MXDG -e ...