Re^2: removing <br> from my output

Replies are listed 'Best First'.
Re^3: removing <br> from my output by Anonymous Monk on May 20, 2009 at 14:16 UTC
yskmonk? Is that you? yskmonk said repeately that it is working for him.	[reply]
Re^4: removing <br> from my output by raisputin (Scribe) on May 20, 2009 at 15:18 UTC
yskmonk: `#!/usr/bin/perl use strict; use warnings; my $outfile="out.html"; my $final="final.txt"; open OUTFILE, "<$outfile"; open FINAL, ">$final"; while (<OUTFILE>) { s/<br>//gi; print FINAL if /(line\d=(\d\|[A-Za-z]{3}\s).)/; }` [download] Input File: (out.html) line1=10 line3=20 line3=30 line4=Mon May 18 02:28:58 EDT 2009 line5=60 line6=Mon May 18 02:28:58 EDT 2009 line7=Mon May 18 02:28:58 EDT 2009 line8=Mon May 18 02:28:58 EDT 2009 line20=Mon May 18 02:28:58 EDT 2009 line30=60 line40=Jambalaya #erroneous input, should not print to +final.txt line100=45 line 200=Mon May 18 02:27:58 EDT 2009 line1000=Mon May 18 02:28:58 EDT 2009 line1001=90 line 2000=Mon May 18 02:28:58 EDT 2009 #erroneous input, shoul +d not print to final.txt line2001=100 line10000=50 line10001=Mon May 18 02:28:58 EDT 2009 [download] Output file (final.txt): `line1=10 line3=20 line3=30 line4=Mon May 18 02:28:58 EDT 2009 line5=60 line6=Mon May 18 02:28:58 EDT 2009 line7=Mon May 18 02:28:58 EDT 2009 line8=Mon May 18 02:28:58 EDT 2009 line20=Mon May 18 02:28:58 EDT 2009 line30=60 line100=45 line1000=Mon May 18 02:28:58 EDT 2009 line1001=90 line2001=100 line10000=50 line10001=Mon May 18 02:28:58 EDT 2009` [download] Note: This does not* take care of removing duplicates	[reply] [d/l] [select]
Re^5: removing <br> from my output by yskmonk (Initiate) on May 20, 2009 at 18:47 UTC
Thank you! it worked.I could even get rid of the duplicate lines. one more question:can I use the same thing if the input file has lines like below: `line50=false` [download]	[reply] [d/l]
Re^6: removing <br> from my output by raisputin (Scribe) on May 20, 2009 at 19:31 UTC