% perl -MO=Deparse -e 'print ".c";'
-e syntax OK
print '.c';