http://qs1969.pair.com?node_id=464850

blackadder has asked for the wisdom of the Perl Monks concerning the following question:

Dear Gods

I wonder if you have a moment.

I have a data sheet containing the following column headers;
Srv_Name SAN_Info Criticality_rating Commission Date
The data inside the table is of this nature;
Srv_0A,xxxxxxxxx,,xxxxxxxxxxx Srv_0A,,, Srv_0G,,, Srv_0B,xxxxxxxxxx,,xxxxxxxxx Srv_0A,,,xxxxxxxxxxxxxx Srv_0G,xxxxxxxxxxx,xxxxxxxxxxxxxx, Srv_0B,,xxxxxxxxxxxxxx,
And I need to consolidate the information pertaining to one entry in a single distinct record. Producing an output such as that;
Srv_0A,xxxxxxxxxxxxx,xxxxxxxxxxxx,xxxxxxxxxxxxxxxxxx Srv_0G,xxxxxxxxxxxxx,xxxxxxxxxxxx, Srv_0B, xxxxxxxxxxxxx,xxxxxxxxxxxx,xxxxxxxxxxxxxxxxxx
And All the entries that were not matched with any thing will be stored else were. I have spend a lot of thinking time but haven’t managed to come up with any ideas.

Your divine intervention is highly regarded....Thanks.
Blackadder