🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #1038

GOLF: averiguar directorios con un único archivo dentro

#1038
From: David Serrano (Hue-Bond)
Date: Sun, 09 Apr 2006 19:28
25 lines
1994 bytes
Por si alguien se aburre (tanto como yo) (que no creo)...

En un directorio cualquiera (por ejemplo, uno llamado "mp3" ;^)) tenemos un
montón de directorios en los que dentro puede haber:

a) varios archivos y/o directorios
b) un único directorio
c) un único archivo regular

En dicho directorio mp3 sólo hay directorios. En ningún sitio hay sockets,
pipas ni demás. Queremos averiguar, de todos estos directorios, los que
cumplen c). El programa debe imprimirlos separados por alguno de los
caracteres habituales de $IFS. El mp3 es nuestro directorio actual de
trabajo.

Este es mi intento, 48 caracteres:

perl -le'@_=<$_/*>,@_==1&&-f$_[0]&&print for<*>'

Si alguien lo va a probar en bash, que sepa que ninguno de los archivos o
directorios tiene espacios en el nombre.


-- 
 David Serrano
Technical Details
Message-ID: <slrne3io3q.2r9.responder_solo_en_el_grupo@genus.hue-bond.info>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news3.google.com!news.glorb.com!news.antakira.com!cagarruta.escomposlinux.org!appleseed.escomposlinux.org!cernicalo.escomposlinux.org!escomposlinux.org!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: f86c8,9ee7624a08527b65,start
X-Google-Attributes: gidf86c8,public
X-Google-Language: SPANISH,UTF8
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news3.google.com!news.glorb.com!news.antakira.com!cagarruta.escomposlinux.org!appleseed.escomposlinux.org!cernicalo.escomposlinux.org!escomposlinux.org!not-for-mail
From: "David Serrano (Hue-Bond)" <responder_solo_en_el_grupo@yahoo.es>
Newsgroups: es.comp.os.linux.programacion
Subject: GOLF: averiguar directorios con un único archivo
 dentro
Date: Sun, 9 Apr 2006 19:28:58 +0000 (UTC)
Organization: I work for myself
Lines: 25
Message-ID: <slrne3io3q.2r9.responder_solo_en_el_grupo@genus.hue-bond.info>
NNTP-Posting-Host: 132.red-83-40-159.dynamicip.rima-tde.net
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
X-Trace: cormoran.emeteo.local 1144610938 11785 83.40.159.132 (9 Apr 2006 19:28:58 GMT)
X-Complaints-To: emeteo@escomposlinux.org
NNTP-Posting-Date: Sun, 9 Apr 2006 19:28:58 +0000 (UTC)
X-Message-Flag: Visit http://www.debian.org/
X-MSMail-Priority: High
Mail-Copies-To: nobody
User-Agent: slrn/0.9.8.1pl1 (Debian)