Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
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
Replies are listed 'Best First'.
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 scrutinizing the Monastery: (13)
As of 2015-07-28 11:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (254 votes), past polls