Miguel Santinho (Simplicidade.com) <> wrote:
: On Wed, 10 Nov 2004 00:04:12 -0600
: "Charles K. Clarkson" <[EMAIL PROTECTED]> wrote:
:
: : my @headers = split ' ', <DATA>;
:
: This way, if tomorrow you have some data like:
:
: extents nptot
: 5 1671035
: 2223412520365
:
: you'll be in troubles, right?
Correct.
: : my @tables;
: : while (<DATA>) {
: : my %table;
: : @table{ @headers } = split;
: ^^^^^^^^^^^^^^^^^^^^^^^^^^^
: I love this part! Looks like magic to me :-)
[bows] Thank you, thank you, I'll be here all week!
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
