Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^3: Secret Perl Operators: the boolean list squash operator, x!! (grep)

by tye (Sage)
on Jul 31, 2006 at 21:25 UTC ( #564876=note: print w/replies, xml ) Need Help??


in reply to Re^2: Secret Perl Operators: the boolean list squash operator, x!! (grep)
in thread Secret Perl Operators: the boolean list squash operator, x!!

$is_admin_link isn't in your list so it being defined doesn't matter. The second part of my node addresses most of your example while the first part of my node addresses the $is_admin_link part:

my $uri = join '/', grep defined $_, 'http://ex­ample.net/­app', ( grep $is_admin_link, 'admin' ), $subsite, $mode, $id, $submode;

- tye        

  • Comment on Re^3: Secret Perl Operators: the boolean list squash operator, x!! (grep)
  • Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://564876]
help
Chatterbox?
[choroba]: Tux: What kind of dead-key diacriticals do you use? It works for me: ůěščö
[choroba]: Do the keys work at any other Tk application?

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (7)
As of 2017-09-25 19:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    During the recent solar eclipse, I:









    Results (288 votes). Check out past polls.

    Notices?