Help for this page

Select Code to Download


  1. or download this
    my(@list) = glob('/path/d*/d*');
    
  2. or download this
    sub get_by_glob {
        my @dids = map {/d([^\/]+)$/; $1} csh_glob("$path/d[0-9]*/d[0-9]*"
    +);
    ...
        }
        return \@dids;
    }