 | | Re: Access a LEGO set DB with your phone!
|
|
(...) I were a programmer! I've spent the last eight hours trying to learn enough perl to massage the data into a multidimensional array, but I think I'm giving up, for the day at least. I can't find a reference, tutorial, or FAQ that describes more (...) (22 years ago, 17-Mar-02, to lugnet.off-topic.geek)
|
| |
| | Re: Access a LEGO set DB with your phone!
|
|
(...) ahhh, you said the magic word (perl) :) If you could explain to me exactly what you need, I'll give ya a script that will do it :) (...) you could use perl for that too, except that why load the server more then you need to? get the list file, (...) (22 years ago, 18-Mar-02, to lugnet.off-topic.geek)
|
| |
| | Re: Access a LEGO set DB with your phone!
|
|
(...) Well, I've discarded the first part...the explanatory text up through the big ________. Then I've read the rest of the file into an array where each item in the array is one line. So now I'm trying to split() the @array[items] by column, (...) (22 years ago, 18-Mar-02, to lugnet.off-topic.geek)
|
| |
| | Re: Access a LEGO set DB with your phone!
|
|
(...) first of all, you're running an open ended loop on the array, when you can just run through each element: foreach $set (@sets) { (...) that trailing ']' is a typo, right? I'm not running this, but I think that would be a syntax error... (...) (...) (22 years ago, 18-Mar-02, to lugnet.off-topic.geek)
|
| |
| | Re: Access a LEGO set DB with your phone!
|
|
(...) The example at (URL) suggested using : for (@lines) {do stuff} But that didn't seem to work. I'm looking at a simple tutorial on foreach, but I don't get what the $set means or does for the loop. In your example, is it doing something like (...) (22 years ago, 18-Mar-02, to lugnet.off-topic.geek)
|
| |
| | Re: Access a LEGO set DB with your phone!
|
|
(...) well, $set gets assigned each element in the array, in order. so if your array is "1", "10", "20", "this-string", $set will get each of these values, then run the code block. (...) maybe I'm misunderstanding again... @array = split /\t/, (...) (22 years ago, 18-Mar-02, to lugnet.off-topic.geek)
|
| |
| | Re: Access a LEGO set DB with your phone!
|
|
(...) Chris, Save the attached Perl5 program to a file (parse.pl) and try this: cat bynumber.txt | perl parse.pl | more --Todd -=-=-=-=-=-=-=-=-=-=...=-=-=-=-=- #!/usr/local/bin/perl5 -w use strict; while (<STDIN>) { last if m/^_/; } # Skip document (...) (22 years ago, 20-Mar-02, to lugnet.off-topic.geek)
|
