evgeny@analog4 620 > perl -e 'print join("\n",( glob "*")), "\n";'
arielg
cad
canalog2
izika
laycont1
laycont2
liord
maora
shimons
evgeny@analog4 621 > cd evgeny
evgeny@analog4 622 > cd ../
evgeny@analog4 623 > perl -e 'print join("\n",( glob "*")), "\n";'
arielg
cad
canalog2
evgeny
izika
laycont1
laycont2
liord
maora
shimons