Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: Blacklisting with a Regular Expression

by greenFox (Vicar)
on Aug 19, 2005 at 06:12 UTC ( #485029=note: print w/ replies, xml ) Need Help??


in reply to Blacklisting with a Regular Expression

I'd be inclined to do that as a sub like this:

sub is_blacklisted { my $string = $_[0]; for (@blacklist){ # add \b /i to re as required return 1 if ( $string =~ /$_/ ); } return 0; }

<Rant> Where I am working at the moment they have a set of key words blocked on the proxy server. I discovered it by accident doing a search for "death and taxes", apparently "death" is not an acceptable topic even though it was completely benign in the context of my search, you can't even do a dictionary search for death! "Dead" on the other hand is ok...

--
Murray Barton
Do not seek to follow in the footsteps of the wise. Seek what they sought. -Basho


Comment on Re: Blacklisting with a Regular Expression
Download Code
Re^2: Blacklisting with a Regular Expression
by jonnyfolk (Vicar) on Aug 19, 2005 at 11:56 UTC

    I had a similar problem a couple of days ago and opted for the for solution. Are there any advantages either way for using this or a regex?

    Also could you outline what you do with the return value on exiting the sub?

    Thanks

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://485029]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (4)
As of 2014-12-19 03:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (70 votes), past polls