SPUG: getting a list of directories

[Ryan Christianson]

How about this:

my @dir;
map { push @dir,$_ if -d "/usr/myapp/" . $_  } split /\n/, `ls /usr/myapp`;



----- Original Message -----
From: Todd Wells <toddw at wrq.com>
To: <spug-list at pm.org>
Sent: Thursday, January 20, 2000 11:53 AM
Subject: SPUG: getting a list of directories


> I'd like to get a list of directory names (and only directory names) in
> /usr/myapp.  What's the best way to go about this?  I wish the cookbook
had
> a recipe for this.  I see that readdir specifically excludes directory
> names.
>
> -Todd
>
>
>  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
>     POST TO: spug-list at pm.org        PROBLEMS: owner-spug-list at pm.org
>  Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
>  SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
>         Email to majordomo at pm.org: ACTION spug-list your_address
>
>
>


 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    POST TO: spug-list at pm.org        PROBLEMS: owner-spug-list at pm.org
 Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
 SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
        Email to majordomo at pm.org: ACTION spug-list your_address