Date: Fri, 5 Jun 2009 16:49:47 -0400 From: "Grant Peel" <gpeel@thenetnow.com> To: <freebsd-questions@freebsd.org> Subject: RegEx Message-ID: <512055A7FA6F44DCB287AB729AED7351@GRANT>
next in thread | raw e-mail | index | archive | help
Hi all,
Does anyone know of a current mailing list that discusses regular =
expressions?
I have Googled a number of time, but everything I find is old.
Specifically, I am looking for a modification to this per code:
#!/usr/local/bin/perl
...
my $iframeexp=3D"[\<IFRAMEiframe =
]+.+$ifdomainname+.+[\/\<\>IFRAMEiframe]";
...
foreach (@readin){
...
if( $_ =3D~ /$iframeexp/) {
print "Found Match in (HTML?) =
$fullname\n";
$_ =3D~ s/$iframeexp/$replace/g;
$matched =3D 1;
if ($logfiles =3D=3D 1) {
open(LOG, ">>$logpath") or warn "cannot open =
$logpath";
print LOG "IFRAME (HTML?) found in =
$fullname\n";
close(LOG);
...
exit;
That does not strip out the <BODY...> part of a line that in an html =
file (if the <iframe ...> exists on the same line as the body tag).
-Grant
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?512055A7FA6F44DCB287AB729AED7351>
