Aloha all,

I've got some files like this:

...
1125356700 0 0 0 0
1125356400 15 0 25 0
1125356100 25 0 25 0
1125355800 25 0 25 0
1125355500 25 0 25 0
... lines here  ...
1125397800 0 0 0 0
1125397500 0 0 0 0
1125397200 0 0 0 0
1125396900 0 0 0 0
1125396600 0 0 0 0
1125396300 0 0 0 0
1125396000 39006 0 63597 0
1125395700 63597 0 63597 0
1125395400 63597 0 63597 0
1125395100 63597 0 63597 0
1125394800 63597 0 63597 0
1125394500 63597 0 63597 0
1125394200 63597 0 63597 0
...

[download]

I would like to go through this file, and look at ONLY the four fields on the right, not the timestamp (the first number). If any of those nubmers is over 1000, I would like to replace it with a zero.

Is this possible without a zillion lines of code? Or should I hack up some crazy shell solution?

I imagine that if someone could at least tell me how to break each line into the four separate numbers, ie $var1, $var2, $var3, and $var4, then I could likely get the rest myself, though it wouldn't be pretty.

Thanks a lot,

-Jack C
jack {at} crepinc.com
http://www.crepinc.com/

In reply to String Search/Replace by crep

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • 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:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.