# ******************************************************************** # # File : $Source: /cvsroot/ijbswa/current/re_filterfile,v $ # # Purpose : Rules to process the content of web pages # # Copyright : Written by and Copyright (C) 2001 the SourceForge # IJBSWA team. http://ijbswa.sourceforge.net # # This program is free software; you can redistribute it # and/or modify it under the terms of the GNU General # Public License as published by the Free Software # Foundation; either version 2 of the License, or (at # your option) any later version. # # This program is distributed in the hope that it will # be useful, but WITHOUT ANY WARRANTY; without even the # implied warranty of MERCHANTABILITY or FITNESS FOR A # PARTICULAR PURPOSE. See the GNU General Public # License for more details. # # The GNU General Public License should be included with # this file. If not, you can view it at # http://www.gnu.org/copyleft/gpl.html # or write to the Free Software Foundation, Inc., 59 # Temple Place - Suite 330, Boston, MA 02111-1307, USA. # # Revisions : # $Log: re_filterfile,v $ # Revision 1.8 2001/06/29 13:34:00 oes # - Added explanation for U and T options # - Added hint on image replacement by CGI call # - Fixed bug in banner-by-size jobs # # Revision 1.7 2001/06/19 14:21:56 oes # Fixed microsuck line # # Revision 1.6 2001/06/09 14:01:57 swa # header. cosmetics. default: no messing ala microsuck. # # # # ********************************************************************/ # # Syntax: One Perl-Style substitution per line. # For Details see the perlre, perlop and pcre manpages. # Note that you are free to choose the delimter as you see fit. # # Note: In addidion to the Perl options egimosx, the following nonstandard # options are supported: # # 'U' turns the default to ungreedy matching. Add ? to quantifiers to # switch back to greedy. # 'T' (trivial) prevents parsing for backreferences in the substitute. # Use if you want to include text like '$&' in your substitute without # quoting. # # ********************************************************************/ # # Kill OnUnload popups. Yummy. # check it out on http://www.zdnet.com/zdsubs/yahoo/tree/yfs.html # # ********************************************************************/ s/(
)/$1never$2/i # ********************************************************************/ # # Kill refresh tags. I like to refresh myself. Manually. # check it out on http://www.airport-cgn.de/ and go to the arrivals page. # # ********************************************************************/ s/]*http-equiv[^>]*refresh.*URL=([^>]*?)"?>//i s/]*http-equiv="?page-enter"?[^>]*content=[^>]*>//i # ********************************************************************/ # # If I allow popups, I want them to be resizeable and have a location # and status bar: check it out on http://www.airport-cgn.de/ and go to # the arrivals page. # # ********************************************************************/ # s/resizable="?(no|0)"?/resizable=1/ig s/noresize/yesresize/ig # s/location="?(no|0)"?/location=1/ig s/status="?(no|0)"?/status=1/ig # s/scrolling="?(no|0|Auto)"?/scrolling=1/ig # s/menubar="?(no|0)"?/menubar=1/ig #s/framespacing="?(no|0)"?//ig # #s/margin(height|width)=[0-9]*//gi # ********************************************************************/ # # Remove frameborder=0 and border=0 from framesets # # ********************************************************************/ s/(