Hello Monks,
Here is what I have. This isn't very clean and depends on the fact that there is only a single split. I'd like to clean this up and simplify it a bit. Note: It does work, but I think this can be simplified. Here is a sample of the code I want to modify
RR<9> vr<9> vr<8> 1.25126K $SUB=<*40>Vrefout $[PI]
RR<10> vr<10> vr<9> 1.25126K $SUB=<*40>Vrefout $[PI]
RR<11> vr<11> vr<10> 1.25126K $SUB=<*40>Vrefout $[PI]
RR<12> vr<12> vr<11> 1.25126K $SUB=<*40>Vrefout $[PI]
and here is what it should clean up to..
RR<9> vr<9> vr<8> 1.25126K $SUB=Vrefout $[PI]
RR<10> vr<10> vr<9> 1.25126K $SUB=Vrefout $[PI]
RR<11> vr<11> vr<10> 1.25126K $SUB=Vrefout $[PI]
RR<12> vr<12> vr<11> 1.25126K $SUB=Vrefout $[PI]
And here is my <it>kludgy</it> code
if ($line =~ /^R.*\$SUB\=\<\*\d+\>/){
my @resline = split /=/, $line;
$resline[1] =~ s/\<\*\d+\>/=/;
$line = $resline[0].$resline[1];
}
I am pretty open to suggestions. Thanks much
Rhodium
The <it>seeker</it> of perl wisdom.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|