
No such thing as a small change
	PerlMonks

split then join based on common value in field

by brianjb (Novice)

on Jun 01, 2012 at 23:53 UTC ( [id://973890]=perlquestion: print w/replies, xml )

Need Help??

Help for this page

Select Code to Download

Select or download this

9885    10.10.9.48    Room    1105A
9885    10.10.9.48    Jack    1105A--05D
...
114949  10.10.184.0    blockSecEmail   John.goody@google.com
114949  10.10.184.0    nasa_nets       off

Select or download this

10.10.9.48|Room=1105A|Jack=1105A--05D|org_code=B703|Building=1268A

...
7878|blockAdminEmail=lucy.p.wallice@google.com|blockTechName=TEST LAN|
+blockSecPhon
e=222-555-3232|blockTechEmail=terCInternal@google.com|blockSecEmail=Jo
+hn.good
y@google.com|nasa_nets=off

Select or download this

    $out_file="/tmp/brian_test.$datestring";
    open(IN,"<$TMPCONTLIST") or die "Can't open $TMPCONTLIST!\n";
...
    }
    close IN;
    close OUT;

Select or download this

10.10.9.48|User_POC_Phone|222-555-2322
|
...
10.10.9.48|org_code|B703
|
10.10.9.48|Building|1268A

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: perlquestion [id://973890]
Approved by Eliya
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others drinking their drinks and smoking their pipes about the Monastery: (5)

As of 2024-04-23 23:20 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found