$ perl -e "opendir DIR, '.'; print '->', join '|', readdir(DIR);"
->.|..|aaaa|bbbb|cccc|.dddd|.eeee|.ffff