is there a way to write this without using map AND grep AND without making
it longer than it is?
@must = map { m/(.*)\/\*/; $1 } grep m/\/\*/, @recomp;

where  @recomp = qw( stuff/stuff.c
                crap/*
                morestuff/*
                stuffy/stuff_stuff.c
                stuffy/suffering.c
                ); # and more of the similar


Delivery Queue
<http://www/reldist-bin/build/assign/listassign.cgi?reverse=on>

Nikola Janceski
Summit Systems, Inc.
212-896-3400

Love all. Trust a few. Do wrong to none.
-- William Shakespeare 


----------------------------------------------------------------------------
--------------------
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to