Shell Programming and Scripting

COUNT=1
for MYDIR in `ls /`
do
  VOBS[${COUNT}]=${MYDIR}
  echo "${COUNT}. ${MYDIR}"
  COUNT=expr ${COUNT} + 1
done

 
1. BA
2. GTE
3. IBM
4. VB
5. file
6. folder
8. kernal
9. lost+found
10. mnt
11. net
12. opt
13. platform
14. proc
15. profile.new
16. sbin
17. scripts
18. tmp
19. var
20. vol
21. ......etc

opendir DIR,"." or die "Can't open dir : $!\n";
while (my $files=readdir(DIR))
{

if ($files=~/^\./) #this is for avoiding the . and .. default files
{
    next;
}
print "$count) $files\t";
if ( $count % 3 == 0 )
{
    print "\n";
}
$count++;
}

1) xac  2) dir.pl       3) func.sh
4) xad  5) sc.sh        6) xae
7) xab  8) test.sh      9) split.sh
10) xaa

COUNT=1
for MYDIR in `ls /`
do
VOBS[${COUNT}]=${MYDIR}
printf "%-25s" "${COUNT}. ${MYDIR}"
let SPLIT=`expr ${COUNT} % 3`
if [ $SPLIT -eq 0 ]
then
        echo
fi
let COUNT=${COUNT}+1
done

ls / |awk '{print NR".", $0}'