08-31-2004
multiple operation
Fellows I ran in to a problem this morning and could not figure out a solution to it.
I have a file like
OBJECT="ABC" GFT="JHU"
DESCRIPTION="ABC MNCL JHDG "
OBJECT="ABC" GFT="JHU"
DESCRIPTION="ABC MNCL JHDG "
OBJECT="ABC" GFT="JHU"
DESCRIPTION="ABC MNCL JHDG "
DESCRIPTION="ABC MNCL JHDG "
DESCRIPTION="ABC MNCL JHDG "
OBJECT="ABC" GFT="JHU"
DESCRIPTION="ABC MNCL JHDG "
What I am trying to do is whenever there is a repition of pattern DESCRIPTION consecutively I want to delete all the lines but first.
On the outpur file i want to add consecutive lines to one line.
I couldn't figure out a way to do the first step.
But for secod i was trying this script
#! /bin/sh
awk 'BEGIN {
RS="";
FS="\n";
}
{ print $1 $2 }' filename
give the output record too long
Any thought why is it doing it more over Can i use paste command to do the second step??
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
How to undo split operation ? (1 Reply)
Discussion started by: scotty_123
1 Replies
2. Shell Programming and Scripting
I am using egrep to extract numbers from a file and storing them as variables in a script. But I am not able to do any arithmetic operations on the variables using "expr" because it stores them as char and not integers. Here is my code and the error I get. Any help will be appreciated.
#!/bin/sh... (3 Replies)
Discussion started by: emjayshaikh
3 Replies
3. Shell Programming and Scripting
i am new user of unix.i have a question.My script is-
export STR_ALFA=`head -2 "${FILE_PATH}"|tail -1|cut -d"," -f1`
"${TEST_HOME}"/function/chk_alfa.ksh STR_ALFA
now i want to check STR_ALFA:
1)whether is alphabetic
2)whether is numeric
3)whether is alphanumeric... (1 Reply)
Discussion started by: arghya_owen
1 Replies
4. Shell Programming and Scripting
I have a txt file with several columns and i want to peform an operation on two columns and output it to a new txt file .
file.txt
900.00000 1 1 1
500.00000
500.00000
100000.000
4
4
1.45257346E-07 899.10834 ... (4 Replies)
Discussion started by: shashi792
4 Replies
5. What is on Your Mind?
Does anyone still use modems for anything? Every now and then I see a web site that offers low res video for dial-up users. I wonder if any dial-up users still exist. But even if you have a wide band Internet connection,you might still use a modem for something else.
For the purposes of this... (13 Replies)
Discussion started by: Perderabo
13 Replies
6. Shell Programming and Scripting
Hi experts,
I need to do a mathematical calculation between each data in 3 different files. Output is using formula (A11+B11)/(1+C11).
INPUT :
File A.txt
A11 A12
A21 A22
File B.txt
B11 B12
B21 B22
File C.txt
C11 C12
C21 C22
OUTPUT:
(A11+B11)/(1+C11) (A12+B12)/(1+C12)... (3 Replies)
Discussion started by: guns
3 Replies
7. Shell Programming and Scripting
I have four files that look like this:
file_1:
a b c
d e f
file_2:
g h i
j k l
file_3:
m n o
p q r (4 Replies)
Discussion started by: kayak
4 Replies
8. Shell Programming and Scripting
I need to read a file line by line, then depending on the contents of each line, type in a code that will get written to an array.
The problem I have is when I ask the user to confirm the input code, if it is wrong, how do i Return to ask again?
Any thing I try increments the file to the next... (6 Replies)
Discussion started by: kcpoole
6 Replies
9. Shell Programming and Scripting
Hi all,
Saying we have two files:
1. A "Reference File" whose content is "Variable Name": "Variable Value"
2. A "Model File" whose content is a model program in which I want to substitute "VariableName" with their respective value to produce a third file "Program File" which would be a... (4 Replies)
Discussion started by: dae
4 Replies
10. Shell Programming and Scripting
Hi Experts,
Please bear with me, i need help
I am learning AWk and stuck up in one issue.
First point : I want to sum up column value for column 7, 9, 11,13 and column15 if rows in column 5 are duplicates.No action to be taken for rows where value in column 5 is unique.
Second point : For... (12 Replies)
Discussion started by: as7951
12 Replies
LEARN ABOUT DEBIAN
hash::case
Hash::Case(3pm) User Contributed Perl Documentation Hash::Case(3pm)
NAME
Hash::Case - base class for hashes with key-casing requirements
INHERITANCE
Hash::Case
is a Tie::StdHash
Hash::Case is extended by
Hash::Case::Lower
Hash::Case::Preserve
Hash::Case::Upper
SYNOPSIS
use Hash::Case::Lower;
tie my(%lchash), 'Hash::Case::Lower';
$lchash{StraNGeKeY} = 3;
print keys %lchash; # strangekey
DESCRIPTION
Hash::Case is the base class for various classes which tie special treatment for the casing of keys. Be aware of the differences in
implementation: "Lower" and "Upper" are tied native hashes: these hashes have no need for hidden fields or other assisting data structured.
A case "Preserve" hash will actually create three hashes.
The following strategies are implemented:
o Hash::Case::Lower (native hash)
Keys are always considered lower case. The internals of this module translate any incoming key to lower case before it is used.
o Hash::Case::Upper (native hash)
Like the ::Lower, but then all keys are always translated into upper case. This module can be of use for some databases, which do
translate everything to capitals as well. To avoid confusion, you may want to have you own internal Perl hash do this as well.
o Hash::Case::Preserve
The actual casing is ignored, but not forgotten.
METHODS
Constructors
$obj->addHashData(HASH)
Add the data of a hash (passed as reference) to the created tied hash. The existing values in the hash remain, the keys are adapted to
the needs of the the casing.
$obj->addPairs(PAIRS)
Specify an even length list of alternating key and value to be stored in the hash.
$obj->setHash(HASH)
The functionality differs for native and wrapper hashes. For native hashes, this is the same as first clearing the hash, and then a
call to addHashData(). Wrapper hashes will use the hash you specify here to store the data, and re-create the mapping hash.
tie(HASH, TIE, [VALUES,] OPTIONS)
Tie the HASH with the TIE package which extends Hash::Case. The OPTIONS differ per implementation: read the manual page for the
package you actually use. The VALUES is a reference to an array containing key-value pairs, or a reference to a hash: they fill the
initial hash.
example:
my %x;
tie %x, 'Hash::Case::Lower';
$x{Upper} = 3;
print keys %x; # 'upper'
my @y = (ABC => 3, DeF => 4);
tie %x, 'Hash::Case::Lower', @y;
print keys %x; # 'abc' 'def'
my %z = (ABC => 3, DeF => 4);
tie %x, 'Hash::Case::Lower', \%z;
SEE ALSO
This module is part of Hash-Case distribution version 1.02, built on March 09, 2012. Website: http://perl.overmeer.net/hash-case/
LICENSE
Copyrights 2002-2003,2007-2012 by Mark Overmeer. For other contributors see ChangeLog.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See
http://www.perl.com/perl/misc/Artistic.html
perl v5.14.2 2012-03-09 Hash::Case(3pm)