>
>I think you have an over-elaborate design for this anyway. I think it's
>likely that your data can be processed better than just by skipping 'n'
>lines between useful records. And even if this is the way you want to go
>there's nothing wrong with

well- my design is likely not that great over all *laugh*
but it works well enough :)   i have taken your code below and
am implementing it--  i think it's clearer what's going on.

>
>  <CMD> for 1 .. $skip->[0]
>  my $partnumber = <CMD>;
>
>  <CMD> for 1 .. $skip->[1]
>  my $inventory = <CMD>;
>
>HTH,
>
>Rob

when i tried the "<CMD> for 1 .. $n;" idea, at first i wanted to use $_ 
again...  i finally understand that it's not being assigned any value at
this point- it still retains the last value from  the while loop...


i wanted to take 

        while (<CMD>){
                $x = $_;
        }

and simply insert your line like so::

        while (<CMD>){
                <CMD> for 1 .. $borkborkborkbork;
                $x = $_;
        }

for me this is a more intuitive idiom, though one i 
now know to be false.


while (<CMD>){
                <CMD> for 1 .. $borkborkborkbork;
                $x = <CMD>;
        }

seems to be the proper (only?) method in this particular case.



:)

thank you,
        willy


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to