Q:\>perl -MConfig -e die$Config{cpp}
cl -nologo -E at -e line 1.