Help for this page

Select Code to Download


  1. or download this
    $ perl -e "print '-> ', join '|', glob('*');"
-> aaaa|bbbb|cccc
...

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