Help for this page

Select Code to Download


  1. or download this
    if (($_ ne ".") && ($_ ne "..") && (! -l $_)) {
    
  2. or download this
    eg: running this script on  /usr/local/html/users/me
    returns
    ...
                 'html' => {
                    'me' => {
    etc,etc. Before the real search begins.
    
  3. or download this
    @elements = split("/" , substr($File::Find::name, length($ARGV[0])));