Help for this page

Select Code to Download


  1. or download this
    /home/sites/abc.com/users/AB/
/home/sites/abc.com/users/CD/
...
/home/sites/abc.com/users/CD/ghf/
/home/sites/abc.com/users/EF/sss/
/home/sites/abc.com/users/EF/bc/
  2. or download this
    #!/usr/bin/perl
$arg1 = $ARGV[0];
...
($reqd, $junk) = split (/\//,$reqd);
push (@store,$reqd);
}