$ perl -e "print '-> ', join '|', glob('*');"
-> aaaa|bbbb|cccc

$ perl -e "print '-> ', join '|', glob('.*');"
-> .|..|.dddd|.eeee|.ffff

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