C:\>perl -e "print __FILE__" -e