perl -c -e 'BEGIN { print "started with -c\n" if somthing }'
perl -e 'BEGIN { print "started with -c\n" if somthing }'