First I thought "problem with the substr index" - but that doesn't look like it.

Then I thought "problem with the assignment binding tighter than the pattern match operator" - but that doesn't seem to be true, either.

Then I pondered "could it be the list context of the match?" I'm still not sure if that's an issue or not.

So, in the spirit of "give a man a fish..." (or, light him on fire, depending on your persepective), I'll offer the following somewhat generic advice when faced with code like this:

  1. Break the single statement into multiple steps: 
    my $bit_o_line = substr ($line, 3, 7);
$bit_o_line =~ m/^\s*(.*)\s*$/;
$BKSIC_MODEL[$i] = $1;

    [download]
  2. Use the debugger to see if things are doing what you expect at each step. You can always go back and recombine the lines into one shorter line after you've debugged it, and no one is ever the wiser. :-)

Hope that helps clear it up.

Peace,
-McD

In reply to Re: Removing spaces, again. by McD
in thread Removing spaces, again. by akm2

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.