linux-l: Perlsuche
JSC
schlegel at tfh-berlin.de
Fr Apr 13 14:03:31 CEST 2001
On Fri, Apr 13, 2001 at 12:37:08AM +0200, Duncan Rubinger wrote:
> > ls */public_html
>
> Aber leider nicht in Perl ...
>
abgeleitet aus: perldoc -f readdir
opendir(DIR, "/home") || die "can't opendir /home: $!";
@dirs = grep { ! /^\./ && -d "/home/$_/public_html" } readdir(DIR);
closedir DIR;
print join("\n", at dirs),"\n";
bye
Jens
--
--------------------------------------------------------------
| Jens Schlegel |
| TFH Berlin email: schlegel at tfh-berlin.de |
--------------------------------------------------------------
Mehr Informationen über die Mailingliste linux-l