I have a couple questions for you.. and they might help you see why it's not doing things the way you want.
1) Why are you using 4 different variables to refer to the same thing? You use $_, $line, $newline and $body_temp all to refer to a line from the file. Why not just use one? I'd suggest either doing
while ($line = <FILE>) {
chomp $line;
...
or
while (<file>) {
chomp;
...
and then continue to use $_.
2) now look at where you check to see if it's a link. At the end of that, you write your new line to OUTFILE. What do you do after that? You continue to run through the code and write output again. I'd suggest either using a next, or just modifiying $line or $_ (whichever you choose to use) or writing if..elsif statements.
Hope this helps..
Rich
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.