$ perl -E 'opendir $d, "."; say $_ for readdir $d;'
.
..
,
------------------------------------------------------------------------------------
.bashrc
.bashrc~
.bash_history
.bash_profile
.cpan
.emacs.d
.inputrc
.joe_state
.lesshst
.minttyrc
.perldb_t
.profile
.ssh
1000
1095341.pl
172.20.98.3.txt
2000
500
8188eu-v7-20150914.tar.gz
a.exe
a.pl
abdou.pl
Acme
add2.pl
add_2.pl
age_switch.pl

[many lines omitted for brevity]

xml.pl
xml_mac.pl
xxxA.txt
xxxH.txt
xxxL.txt
X_oper.pl