Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re: enumerate column numbers

by BrowserUk (Patriarch)
on Oct 10, 2007 at 16:11 UTC ( [id://644013]=note: print w/replies, xml ) Need Help??


in reply to enumerate column numbers

See perlrun for -F

C:\test>perl -aF, -nle"}{print $_,' ', $i++ for @F" junk.txt SUBNET_ID 0 AUTONOMOUS_NETWORK_ID 1 PARENT_ID 2 TREE_PATH 3 SUBNET 4 CIDR_MASK 5 IP_VERSION 6 LOW_ADDRESS 7 HIGH_ADDRESS 8 BROADCAST_ADDRESS 9 SHORT_SUBNET 10 ASSIGNED_ADDRESSES 11 CHILD_SUBNET_COUNT 12 COMMENT 13 SYSTEM_FLAG1 14 REPLICATED_FROM 15 CREATED 16 UPDATED 17 LOCATION 18 USAGE 19 NETWORK_NAME 20

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://644013]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2024-04-25 14:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found