C:\> perl -MGD -e "print 1"