C:\>perl -w -e "print qq($_\n) for glob('C:\Documents and Settings\*')"
C:./Documents
and