in reply to perl -c and BEGIN block

Safe might be of interest.