From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-users-return-9999-mason-zsh=primenet.com.au@sunsite.dk>
Received: (qmail 16488 invoked from network); 7 Mar 2006 15:36:04 -0000
X-Spam-Checker-Version: SpamAssassin 3.1.0 (2005-09-13) on f.primenet.com.au
X-Spam-Level: 
X-Spam-Status: No, score=-2.5 required=5.0 tests=AWL,BAYES_00,
	FORGED_RCVD_HELO autolearn=ham version=3.1.0
Received: from news.dotsrc.org (HELO a.mx.sunsite.dk) (130.225.247.88)
  by ns1.primenet.com.au with SMTP; 7 Mar 2006 15:36:04 -0000
Received: (qmail 39297 invoked from network); 7 Mar 2006 15:35:56 -0000
Received: from sunsite.dk (130.225.247.90)
  by a.mx.sunsite.dk with SMTP; 7 Mar 2006 15:35:56 -0000
Received: (qmail 16052 invoked by alias); 7 Mar 2006 15:35:48 -0000
Mailing-List: contact zsh-users-help@sunsite.dk; run by ezmlm
Precedence: bulk
X-No-Archive: yes
X-Seq: 9999
Received: (qmail 16042 invoked from network); 7 Mar 2006 15:35:47 -0000
Received: from news.dotsrc.org (HELO a.mx.sunsite.dk) (130.225.247.88)
  by sunsite.dk with SMTP; 7 Mar 2006 15:35:47 -0000
Received: (qmail 38242 invoked from network); 7 Mar 2006 15:35:47 -0000
Received: from mailhost.u-strasbg.fr (130.79.200.154)
  by a.mx.sunsite.dk with SMTP; 7 Mar 2006 15:35:45 -0000
Received: from [130.79.188.217] (sys-univ-x.u-strasbg.fr [130.79.188.217])
          by mailhost.u-strasbg.fr (8.13.4/jtpda-5.5pre1) with ESMTP id k27FZiUL005781
          for <zsh-users@sunsite.dk>; Tue, 7 Mar 2006 16:35:44 +0100 (CET)
Message-ID: <440DA84E.7010900@ulpmm.u-strasbg.fr>
Date: Tue, 07 Mar 2006 16:35:42 +0100
From: Marc Chantreux <marc.chantreux@ulpmm.u-strasbg.fr>
User-Agent: Thunderbird 1.5 (Windows/20051201)
MIME-Version: 1.0
To: zsh-users@sunsite.dk
Subject: kinda perl grep ?
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-Greylist: Sender IP whitelisted, not delayed by milter-greylist-2.0.2 (mailhost.u-strasbg.fr [130.79.200.154]); Tue, 07 Mar 2006 16:35:44 +0100 (CET)
X-Virus-Scanned: ClamAV 0.88/1317/Tue Mar  7 07:06:47 2006 on mr4.u-strasbg.fr
X-Virus-Status: Clean

Hi all,


in perl , i write :

@files = grep { chomp; -f $_ } `dpkg -L libapache2-mod-perl2`

in zsh :

for f ( $(dpkg -L libapache2-mod-perl2 ) ) { [[ -f $f  ]] && files+=$f }

i dream about something like

files=( ${$(dpkg -L libapache2-mod-perl2):[[ -f $_ ]]} )

or something like

arraygrep '-f $_ ' $(dpkg -L libapache2-mod-perl2)

someone to make the dream come true ?

regards
mc