From owner-freebsd-questions@FreeBSD.ORG Thu Jan 26 00:34:19 2006 Return-Path: X-Original-To: freebsd-questions@freebsd.org Delivered-To: freebsd-questions@freebsd.org Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125]) by hub.freebsd.org (Postfix) with ESMTP id 34C3416A420 for ; Thu, 26 Jan 2006 00:34:19 +0000 (GMT) (envelope-from antennex@hotmail.com) Received: from hotmail.com (bay106-f9.bay106.hotmail.com [65.54.161.19]) by mx1.FreeBSD.org (Postfix) with ESMTP id EF6DF43D45 for ; Thu, 26 Jan 2006 00:34:18 +0000 (GMT) (envelope-from antennex@hotmail.com) Received: from mail pickup service by hotmail.com with Microsoft SMTPSVC; Wed, 25 Jan 2006 16:34:18 -0800 Message-ID: Received: from 65.54.161.200 by by106fd.bay106.hotmail.msn.com with HTTP; Thu, 26 Jan 2006 00:34:18 GMT X-Originating-IP: [65.68.247.73] X-Originating-Email: [antennex@hotmail.com] X-Sender: antennex@hotmail.com In-Reply-To: <43D7D1A3.8070008@scls.lib.wi.us> From: "Jack Stone" To: nalists@scls.lib.wi.us Date: Wed, 25 Jan 2006 18:34:18 -0600 Mime-Version: 1.0 Content-Type: text/plain; format=flowed X-OriginalArrivalTime: 26 Jan 2006 00:34:18.0726 (UTC) FILETIME=[3E55A860:01C62210] Cc: freebsd-questions@freebsd.org Subject: Re: Perl script help X-BeenThere: freebsd-questions@freebsd.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: User questions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Thu, 26 Jan 2006 00:34:19 -0000 >From: Greg Barniskis >To: Jack Stone >CC: freebsd-questions@freebsd.org >Subject: Re: Perl script help >Date: Wed, 25 Jan 2006 13:29:39 -0600 > >Jack Stone wrote: >>I'm using an old (2001) canned perl script to manage questions to my tech >>site. It is of big help since it can answer common questions from >>templates and a real time saver. > >First, this isn't really a FreeBSD question, so you may certainly have >better luck getting it answered in a Perl-oriented forum (or best, the help >forum or the original author of the script in question). > >[snip] >>Is there any way to insert the same type of tests on those original copies >>in the storage as "*.ftf" files and just delete them so they aren't there >>when the question manager program is loaded?? > >If I were you I would be looking at the Perl code just before those lines >that you quoted in your original message. Inspect the content of >$FORM{message} earlier in the process and use Perl pattern matching to see >if it contains taboo content. Something like > >if ($FORM{message} =~ /taboophrase/) { msgisjunk; } > First, thanks for the tip as it works using "exit;" which might be enough, but would rather do a redirect to a page just in case one of the good guys trips over it in their questions. So, I'll try to figure out how to do that without further burden to you or this fine, helpful and usually friendly list. With regard to your other remarks about learning perl and OT, there are many questions (like shell scripts here today) that don't quite fit. Of course, perl is part of the base OS, so it's not far off for the many script gurus I know that are here. I've been a member of this list for several years and have answered dozens if not several 100 questions of all kinds that I do know about. Since I probably don't ask more than 3 or 4 question a year, I should be entitled to ask them vs my contributions. I enjoy helping when I can OT or not. IMHO, this is one of the best lists to obtain help about scripts when one just doen's have to time to learn a whole scripting language. Going to a script list isn't very helpful either. I'm a "Jack of all trades, but no master of perl." Again, thanks for the help -- but, not the lecture though as it was the obvious thing to do IF one really had time or the right skill/talent to learn a language. Regards, Jack _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/