Kein Betreff

>From guckes  Fri Jan 29 09:25:09 1999
Return-Path: <owner-linux-l at calle.in-berlin.de>
Delivered-To: guckes at math.fu-berlin.de
Received: (qmail 22130 invoked from network); 29 Jan 1999 08:25:07 -0000
Received: from methan.in-berlin.de (160.45.10.13)
  by leibniz.math.fu-berlin.de with SMTP; 29 Jan 1999 08:25:07 -0000
Received: from calle.in-berlin.de (calle.in-berlin.de [193.175.21.97])
	by methan.in-berlin.de (8.9.1/8.9.1) with ESMTP id JAA21067;
	Fri, 29 Jan 1999 09:24:52 +0100 (CET)
	(envelope-from owner-linux-l at calle.in-berlin.de)
Received: by calle.in-berlin.de (Smail3.2.0.98) 
	  from  localhost with smtp
	  id <m1069AJ-000A0YC>; Fri, 29 Jan 1999 09:20:35 +0100 (CET)
Received: by calle.in-berlin.de (Smail3.2.0.98)
	  id <m1069AH-000A0Oa>; Fri, 29 Jan 1999 09:20:33 +0100 (CET)
Message-ID: <19990129092027.A15387 at zedat.fu-berlin.de>
Date: Fri, 29 Jan 1999 09:20:27 +0100
From: Susanne Schmidt <banshee at ZEDAT.FU-Berlin.DE>
To: linux-l at calle.in-berlin.de
Subject: Re: linux-l: Perl Hilfe bitte...
References: <14000.42817.704891.743306 at mero.in-berlin.de>
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Mailer: Mutt 0.93.2i
In-Reply-To: <14000.42817.704891.743306 at mero.in-berlin.de>; from Carsten Wartmann on Thu, Jan 28, 1999 at 07:28:07PM +0100
Sender: owner-linux-l at calle.in-berlin.de
Reply-To: linux-l at calle.in-berlin.de
Status: RO
Content-Length: 1421
Lines: 33

> ich brauche mal Hilfe... Ich möchte ein Perl Script haben, welches mit 
> ein Directory rekursiv auflistet... Jaja, kein Problem einfach ein 
> "ls -lRa", allerdings gibts einige krüpplige ftp-Server, die da nur
> ein nicht-rekursives Listing liefern... 
> 
> Also das erste "ls -la" liefert (in z.B. @dirlist):
> total 25
> drwxr-xr-x   4 cw       cw           1024 Jan 28 19:20 .
> drwxrwxrwt   5 root     root        21504 Jan 28 19:20 ..
> drwxr-xr-x   2 cw       cw           1024 Jan 28 19:21 dira
> drwxr-xr-x   2 cw       cw           1024 Jan 28 19:21 dirb
> -rw-r--r--   1 cw       cw              0 Jan 28 19:20 file1
> -rw-r--r--   1 cw       cw              0 Jan 28 19:20 file2
> -rw-r--r--   1 cw       cw              0 Jan 28 19:20 file3
> 
> jetzt soll das script am "d" erkennen das ein Directory existiert ein
> "cd dira" machen und "ls -la"
> total 2
> drwxr-xr-x   2 cw       cw           1024 Jan 28 19:21 .
> drwxr-xr-x   4 cw       cw           1024 Jan 28 19:20 ..
> -rw-r--r--   1 cw       cw              0 Jan 28 19:21 filex
> -rw-r--r--   1 cw       cw              0 Jan 28 19:21 filey


Hi Charsten, du wirst File::Find TOTAL Geil finden :) 

Das in Kombinationa mit readdir z.B. wird dir beinahe alle rekursiven und
nicht rekursiven Wuensche erfuellen :)

Gruesse, Susanne
-- 
                             Frauen sagen "ja" zu Linux!
                                   banshee at linux.de