Sponsored Content
Top Forums Shell Programming and Scripting Joining three lines with comma separation Post 302072169 by BCarlson on Friday 28th of April 2006 07:32:55 AM
Old 04-28-2006
Joining three lines with comma separation

I have a file that looks like this:

G. KRESSLAR
9618 W. APPALOOSA DRIVE
SUN CITY, AZ 85373
SHIRLEY ALLEN
7272 W. VIA MONTOYA DRIVE
GLENDALE, AZ 85310
LOUIS VALDEZ
244441 N. 86TH AVENUE
PEORIA, AZ 85383
DONNA NEWBON
3231 W. DENTON #D
PHOENIX, AZ 85017
SARAH WILSON
6534 W. PALO VERDE
GLENDALE, AZ 85302
W. GRISAMORE
10017 W. PALMER
SUN CITY, AZ 85351


What I need to do is join each set of three lines, separated by a comma, so that it looks like this:

G. KRESSLAR, 9618 W. APPALOOSA DRIVE, SUN CITY, AZ 85373
SHIRLEY ALLEN, 7272 W. VIA MONTOYA DRIVE, GLENDALE, AZ 85310
LOUIS VALDEZ, 244441 N. 86TH AVENUE, PEORIA, AZ 85383
DONNA NEWBON, 3231 W. DENTON #D, PHOENIX, AZ 85017
SARAH WILSON, 6534 W. PALO VERDE, GLENDALE, AZ 85302
W. GRISAMORE, 10017 W. PALMER, SUN CITY, AZ 85351

Is there a simple sed or awk solution to this?

Thanks in advance for your help.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Joining 2 lines in a file together

Hi guys, I've got a log file which has entries that look like this: ------------------------------------------------------------------------------- 06/08/04 07:57:57 AMQ9002: Channel program started. EXPLANATION: Channel program 'INSCCPQ1.HSMTSPQ1' started. ACTION: None. ... (3 Replies)
Discussion started by: m223464
3 Replies

2. Shell Programming and Scripting

Joining 3 lines at a time

Hi, I have a file which has the contents as below : 07:38:36 EST date 20041117 07:39:06 EST 07:00:29 EDT date 20050504 07:25:16 EDT 07:00:40 EDT date 20050505 07:23:12 EDT I need to delete the new line character from all lines except 3rd,6th,9th etc. lines so that i get the output... (14 Replies)
Discussion started by: Sabari Nath S
14 Replies

3. UNIX for Dummies Questions & Answers

Conditionally joining lines in vi

I've done this before but I can't remember how. Too long away from vi. I want to do a search are replace, but I want the replace to be a join. Example see spot run see spot walk see spot run fast see spot hop %s/run$/<somehow perform a join with the next line>/g so the results... (0 Replies)
Discussion started by: ifermon
0 Replies

4. Shell Programming and Scripting

joining two lines

Hi , I want to join two lines in a file, where the second line contain query string. if it doesn't contain that string i don't want to join e.g. Input file is as following: name fame game none none none name fame game cat eat mice I need output file as name fame game none none... (2 Replies)
Discussion started by: ashrafonics
2 Replies

5. Shell Programming and Scripting

Need help joining lines

Hi All, I need the command to join 2 lines into one. I found lots of threads but none give me the sollution. Probably because unix scripting is one of my best features ;) I got a logfile where line 2 needs to be joined with line 1, lines 4 needs to be joined with line 3 etc If you need... (16 Replies)
Discussion started by: rene21976
16 Replies

6. Shell Programming and Scripting

pattern matching lines using the date, and then joining the lines

Hi Guys, Was trying to attempt the below using awk and sed, have no luck so far, so any help would be appreciated. Current Text File: The first line has got an "\n", and the second line has got spaces/tabs then the word and "\n" TIME SERVER/CLIENT TEXT... (6 Replies)
Discussion started by: eo29
6 Replies

7. Shell Programming and Scripting

Joining lines in a file - help!

I'm looking for a way to join lines in a file; e.,g consider the following R|This is line 1 R|This is line 2 R|This is line 3 R|This is line 4 R|This is line 5 what i want to end up with is R|This is line 1 R|This is line 2 R|This is line 3 R|This is line 4 R|This is line 5 so... (15 Replies)
Discussion started by: Storms
15 Replies

8. Shell Programming and Scripting

Joining lines in different way

Hi all, I'm excited to the part of unix.com forum, and noob to it. I have an query, where I have an file and it contains data like this use thread when posting do no I was expecting the result as use thread thread when when posting posting do do no use thread when thread when... (6 Replies)
Discussion started by: Jose Nirmal
6 Replies

9. Shell Programming and Scripting

Joining broken lines and removing empty lines

Hi - I have req to join broken lines and remove empty lines but should NOT be in one line. It has to be as is line by line. The challenge here is there is no end of line/start of line char. thanks in advance Source:- 2003-04-34024|04-10-2003|Claims|Claim|01-13-2003|Air Bag:Driver;... (7 Replies)
Discussion started by: Jackceasar123
7 Replies

10. Shell Programming and Scripting

Sum up formatted numbers with comma separation

I need to sum up the values in field nr 5 in a data file that contains some file listing. The 5th field denotes the size of each file and following are some sample values. 1,775,947,633 4,738 7,300 16,610 15,279 0 0 I tried the following code in a shell script. awk '{sum+=$5} END{print... (4 Replies)
Discussion started by: krishmaths
4 Replies
Info::RapidCity(3pm)					User Contributed Perl Documentation				      Info::RapidCity(3pm)

NAME
SNMP::Info::RapidCity - SNMP Interface to the Nortel RapidCity MIB AUTHOR
Eric Miller SYNOPSIS
# Let SNMP::Info determine the correct subclass for you. my $rapidcity = new SNMP::Info( AutoSpecify => 1, Debug => 1, # These arguments are passed directly to SNMP::Session DestHost => 'myswitch', Community => 'public', Version => 2 ) or die "Can't connect to DestHost. "; my $class = $rapidcity->class(); print "SNMP::Info determined this device to fall under subclass : $class "; DESCRIPTION
SNMP::Info::RapidCity is a subclass of SNMP::Info that provides an interface to the "RAPID-CITY" MIB. This MIB is used across the Nortel Ethernet Routing Switch and Ethernet Switch product lines (Formerly known as Passport, BayStack, and Accelar). Use or create in a subclass of SNMP::Info. Do not use directly. Inherited Classes None. Required MIBs RAPID-CITY GLOBAL METHODS
These are methods that return scalar values from SNMP $rapidcity->rc_base_mac() ("rc2kChassisBaseMacAddr") $rapidcity->rc_serial() ("rcChasSerialNumber") $rapidcity->rc_ch_rev() ("rcChasHardwareRevision") $rapidcity->chassis() ("rcChasType") $rapidcity->slots() ("rcChasNumSlots") $rapidcity->rc_virt_ip() ("rcSysVirtualIpAddr") $rapidcity->rc_virt_mask() ("rcSysVirtualNetMask") $rapidcity->tftp_host() ("rcTftpHost") $rapidcity->tftp_file() ("rcTftpFile") $rapidcity->tftp_action() ("rcTftpAction") $rapidcity->tftp_result() ("rcTftpResult") Overrides $rapidcity->serial() Returns serial number of the chassis TABLE METHODS
These are methods that return tables of information in the form of a reference to a hash. $rapidcity->i_duplex() Returns reference to map of IIDs to current link duplex. $rapidcity->i_duplex_admin() Returns reference to hash of IIDs to admin duplex setting. $rapidcity->i_vlan() Returns a mapping between "ifIndex" and the PVID or default VLAN. $rapidcity->i_vlan_membership() Returns reference to hash of arrays: key = "ifIndex", value = array of VLAN IDs. These are the VLANs which are members of the egress list for the port. Example: my $interfaces = $rapidcity->interfaces(); my $vlans = $rapidcity->i_vlan_membership(); foreach my $iid (sort keys %$interfaces) { my $port = $interfaces->{$iid}; my $vlan = join(',', sort(@{$vlans->{$iid}})); print "Port: $port VLAN: $vlan "; } $rapidcity->v_index() Returns VLAN IDs ("rcVlanId") RAPID-CITY Port Table ("rcPortTable") $rapidcity->rc_index() ("rcPortIndex") $rapidcity->rc_duplex() ("rcPortOperDuplex") $rapidcity->rc_duplex_admin() ("rcPortAdminDuplex") $rapidcity->rc_speed_admin() ("rcPortAdminSpeed") $rapidcity->rc_auto() ("rcPortAutoNegotiate") $rapidcity->rc_alias() ("rcPortName") RAPID-CITY CPU Ethernet Port Table ("rc2kCpuEthernetPortTable") $rapidcity->rc_cpu_ifindex() ("rc2kCpuEthernetPortIfIndex") $rapidcity->rc_cpu_admin() ("rc2kCpuEthernetPortAdminStatus") $rapidcity->rc_cpu_oper() ("rc2kCpuEthernetPortOperStatus") $rapidcity->rc_cpu_ip() ("rc2kCpuEthernetPortAddr") $rapidcity->rc_cpu_mask() ("rc2kCpuEthernetPortMask") $rapidcity->rc_cpu_auto() ("rc2kCpuEthernetPortAutoNegotiate") $rapidcity->rc_cpu_duplex_admin() ("rc2kCpuEthernetPortAdminDuplex") $rapidcity->rc_cpu_duplex() ("rc2kCpuEthernetPortOperDuplex") $rapidcity->rc_cpu_speed_admin() ("rc2kCpuEthernetPortAdminSpeed") $rapidcity->rc_cpu_speed_oper() ("rc2kCpuEthernetPortOperSpeed") $rapidcity->rc_cpu_mac() ("rc2kCpuEthernetPortMgmtMacAddr") RAPID-CITY VLAN Port Table ("rcVlanPortTable") $rapidcity->rc_i_vlan_if() ("rcVlanPortIndex") $rapidcity->rc_i_vlan_num() ("rcVlanPortNumVlanIds") $rapidcity->rc_i_vlan() ("rcVlanPortVlanIds") $rapidcity->rc_i_vlan_type() ("rcVlanPortType") $rapidcity->rc_i_vlan_pvid() ("rcVlanPortDefaultVlanId") $rapidcity->rc_i_vlan_tag() ("rcVlanPortPerformTagging") RAPID-CITY VLAN Table ("rcVlanTable") $rapidcity->rc_vlan_id() ("rcVlanId") $rapidcity->v_name() ("rcVlanName") $rapidcity->rc_vlan_color() ("rcVlanColor") $rapidcity->rc_vlan_if() ("rcVlanIfIndex") $rapidcity->rc_vlan_stg() ("rcVlanStgId") $rapidcity->rc_vlan_type() ("rcVlanType") $rapidcity->rc_vlan_members() ("rcVlanPortMembers") $rapidcity->rc_vlan_mac() ("rcVlanMacAddress") RAPID-CITY IP Address Table ("rcIpAddrTable") $rapidcity->rc_ip_index() ("rcIpAdEntIfIndex") $rapidcity->rc_ip_addr() ("rcIpAdEntAddr") $rapidcity->rc_ip_type() ("rcIpAdEntIfType") RAPID-CITY Chassis Fan Table ("rcChasFanTable") $rapidcity->rc_fan_op() ("rcChasFanOperStatus") RAPID-CITY Power Supply Table ("rcChasPowerSupplyTable") $rapidcity->rc_ps_op() ("rcChasPowerSupplyOperStatus") RAPID-CITY Power Supply Detail Table ("rcChasPowerSupplyDetailTable") $rapidcity->rc_ps_type() ("rcChasPowerSupplyDetailType") $rapidcity->rc_ps_serial() ("rcChasPowerSupplyDetailSerialNumber") $rapidcity->rc_ps_rev() ("rcChasPowerSupplyDetailHardwareRevision") $rapidcity->rc_ps_part() ("rcChasPowerSupplyDetailPartNumber") $rapidcity->rc_ps_detail() ("rcChasPowerSupplyDetailDescription") RAPID-CITY Card Table ("rcCardTable") $rapidcity->rc_c_type() ("rcCardType") $rapidcity->rc_c_serial() ("rcCardSerialNumber") $rapidcity->rc_c_rev() ("rcCardHardwareRevision") $rapidcity->rc_c_part() ("rcCardPartNumber") RAPID-CITY 2k Card Table ("rc2kCardTable") $rapidcity->rc2k_c_ftype() ("rc2kCardFrontType") $rapidcity->rc2k_c_fdesc() ("rc2kCardFrontDescription") $rapidcity->rc2k_c_fserial() ("rc2kCardFrontSerialNum") $rapidcity->rc2k_c_frev() ("rc2kCardFrontHwVersion") $rapidcity->rc2k_c_fpart() ("rc2kCardFrontPartNumber") $rapidcity->rc2k_c_fdate() ("rc2kCardFrontDateCode") $rapidcity->rc2k_c_fdev() ("rc2kCardFrontDeviations") $rapidcity->rc2k_c_btype() ("rc2kCardBackType") $rapidcity->rc2k_c_bdesc() ("rc2kCardBackDescription") $rapidcity->rc2k_c_bserial() ("rc2kCardBackSerialNum") $rapidcity->rc2k_c_brev() ("rc2kCardBackHwVersion") $rapidcity->rc2k_c_bpart() ("rc2kCardBackPartNumber") $rapidcity->rc2k_c_bdate() ("rc2kCardBackDateCode") $rapidcity->rc2k_c_bdev() ("rc2kCardBackDeviations") RAPID-CITY MDA Card Table ("rc2kMdaCardTable") $rapidcity->rc2k_mda_type() ("rc2kMdaCardType") $rapidcity->rc2k_mda_desc() ("rc2kMdaCardDescription") $rapidcity->rc2k_mda_serial() ("rc2kMdaCardSerialNum") $rapidcity->rc2k_mda_rev() ("rc2kMdaCardHwVersion") $rapidcity->rc2k_mda_part() ("rc2kMdaCardPartNumber") $rapidcity->rc2k_mda_date() ("rc2kMdaCardDateCode") $rapidcity->rc2k_mda_dev() ("rc2kMdaCardDeviations") SET METHODS
These are methods that provide SNMP set functionality for overridden methods or provide a simpler interface to complex set operations. See "SETTING DATA VIA SNMP" in SNMP::Info for general information on set operations. $rapidcity->set_i_speed_admin(speed, ifIndex) Sets port speed, must be supplied with speed and port "ifIndex". Speed choices are 'auto', '10', '100', '1000'. Example: my %if_map = reverse %{$rapidcity->interfaces()}; $rapidcity->set_i_speed_admin('auto', $if_map{'1.1'}) or die "Couldn't change port speed. ",$rapidcity->error(1); $rapidcity->set_i_duplex_admin(duplex, ifIndex) Sets port duplex, must be supplied with duplex and port "ifIndex". Speed choices are 'auto', 'half', 'full'. Example: my %if_map = reverse %{$rapidcity->interfaces()}; $rapidcity->set_i_duplex_admin('auto', $if_map{'1.1'}) or die "Couldn't change port duplex. ",$rapidcity->error(1); $rapidcity->set_i_vlan(vlan, ifIndex) Changes an access (untagged) port VLAN, must be supplied with the numeric VLAN ID and port "ifIndex". This method will modify the port's VLAN membership and PVID (default VLAN). This method should only be used on end station (non-trunk) ports. Example: my %if_map = reverse %{$rapidcity->interfaces()}; $rapidcity->set_i_vlan('2', $if_map{'1.1'}) or die "Couldn't change port VLAN. ",$rapidcity->error(1); $rapidcity->set_i_pvid(pvid, ifIndex) Sets port PVID or default VLAN, must be supplied with the numeric VLAN ID and port "ifIndex". This method only changes the PVID, to modify an access (untagged) port use set_i_vlan() instead. Example: my %if_map = reverse %{$rapidcity->interfaces()}; $rapidcity->set_i_pvid('2', $if_map{'1.1'}) or die "Couldn't change port PVID. ",$rapidcity->error(1); $rapidcity->set_add_i_vlan_tagged(vlan, ifIndex) Adds the port to the egress list of the VLAN, must be supplied with the numeric VLAN ID and port "ifIndex". Example: my %if_map = reverse %{$rapidcity->interfaces()}; $rapidcity->set_add_i_vlan_tagged('2', $if_map{'1.1'}) or die "Couldn't add port to egress list. ",$rapidcity->error(1); $rapidcity->set_remove_i_vlan_tagged(vlan, ifIndex) Removes the port from the egress list of the VLAN, must be supplied with the numeric VLAN ID and port "ifIndex". Example: my %if_map = reverse %{$rapidcity->interfaces()}; $rapidcity->set_remove_i_vlan_tagged('2', $if_map{'1.1'}) or die "Couldn't add port to egress list. ",$rapidcity->error(1); $rapidcity->set_delete_vlan(vlan) Deletes the specified VLAN from the device. $rapidcity->set_create_vlan(name, vlan) Creates the specified VLAN on the device. Note: This method only allows creation of Port type VLANs and does not allow for the setting of the Spanning Tree Group (STG) which defaults to 1. perl v5.12.4 2011-09-28 Info::RapidCity(3pm)
All times are GMT -4. The time now is 10:14 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy