09-11-2014
A clunky way in a shell script would be to:-
- Read the file and loop for each line
- Calculate half the line length with ((half=${#line}/2))
- Build up a string of question marks for the given length (each on represents a single character)
- Use variable substitution to split the line
- Compare the original with the half you have (twice)
- If there is a match, take action one way, if not, the other way
- Repeat for the remainder of the lines.
Does this seem a sensible logic to you? If so, we can help you code where you are stuck.
What do you think?
Robin
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
Hi,
I have 3 lines in a text file that is similar to this (as a result of a diff between 2 files):
35,36d34
< DATA.EVENT.EVENT_ID.s = "3661208"
< DATA.EVENT.EVENT_ID.s = "3661208"
I am trying to get it down to just this:
DATA.EVENT.EVENT_ID.s = "3661208"
How can I do this?... (11 Replies)
Discussion started by: ocelot
11 Replies
2. Shell Programming and Scripting
Hi,
I have two strings like this in an array:
For example:
@a=("Brain aging is associated with a progressive imbalance between intracellular concentration of Reactive Oxygen Species","Brain aging is associated with a progressive imbalance between intracellular concentration of Reactive... (9 Replies)
Discussion started by: vanitham
9 Replies
3. Shell Programming and Scripting
My input contains a single word lines.
From each line
data.txt
prjtestBlaBlatestBlaBla
prjthisBlaBlathisBlaBla
prjthatBlaBladpthatBlaBla
prjgoodBlaBladpgoodBlaBla
prjgood1BlaBla123dpgood1BlaBla123
Desired output -->
data_out.txt
prjtestBlaBla
prjthisBlaBla... (8 Replies)
Discussion started by: kchinnam
8 Replies
4. Shell Programming and Scripting
Hi,
do you have awk or sed sommand taht will delete duplicate lines like.
sample:
server1-log1-14
server1-log2-14
superserver-time-2
superserver-log-2
output:
server-log1-14
superserver-time-2
thansk (2 Replies)
Discussion started by: kenshinhimura
2 Replies
5. Shell Programming and Scripting
I have more than 100 files like this:
SVEAVLTGPYGYT 2
SVEGNFEETQY 10
SVELGQGYEQY 28
SVERTGTGYT 6
SVGLADYNEQF 21
SVGQGYEQY 32
SVKTVLGYEQF 2
SVNNEQF 12
SVRDGLTNSPLH 3
SVRRDREGLEQF 11
SVRTSGSYEQY 17
SVSVSGSPLQETQY 78
SVVHSTSPEAF 59
SVVPGNGYT 75 (4 Replies)
Discussion started by: xshang
4 Replies
6. Shell Programming and Scripting
Hi Perl users,
I have another problem with text processing in Perl. I have a file below:
Linux Unix Linux Windows SUN
MACOS SUN SUN HP-AUX
I want the result below:
Unix Windows SUN
MACOS HP-AUX
so the duplicate string will be removed and also the keyword of the string on... (2 Replies)
Discussion started by: askari
2 Replies
7. Shell Programming and Scripting
I have a script that builds a database ~30 million lines, ~3.7 GB .cvs file. After multiple optimzations It takes about 62 min to bring in and parse all the files and used to take 10 min to remove duplicates until I was requested to add another column. I am using the highly optimized awk code:
awk... (34 Replies)
Discussion started by: Michael Stora
34 Replies
8. Red Hat
Hi,
I have a file which is an extract of jil codes of all autosys jobs in our server.
Sample jil code:
**************************
permission:gx,wx
date_conditions:yes
days_of_week:all
start_times:"05:00"
condition: notrunning(appDev#box#ProductLoad)... (1 Reply)
Discussion started by: raghavendra
1 Replies
9. Shell Programming and Scripting
Hi all
I have a grep written to pull out values; below (in the code snip-it) is an example of the output.
What I'm struggling to do, and looking for assistance on, is identifying the lines that have duplicate strings.
For example 74859915K74859915K in the below is 74859915K repeated twice but... (3 Replies)
Discussion started by: brighty
3 Replies
10. Shell Programming and Scripting
Hi All,
I have a requirement where I have to get the duplicate string count and uniq error message. Below is my file:
Rejected - Error on table TableA, column ColA.
Error String 1.
Rejected - Error on table TableA, column ColB.
Error String 2.
Rejected - Error on table TableA, column... (6 Replies)
Discussion started by: Deekhari
6 Replies
LEARN ABOUT MOJAVE
tie::handle
Tie::Handle(3pm) Perl Programmers Reference Guide Tie::Handle(3pm)
NAME
Tie::Handle - base class definitions for tied handles
SYNOPSIS
package NewHandle;
require Tie::Handle;
@ISA = qw(Tie::Handle);
sub READ { ... } # Provide a needed method
sub TIEHANDLE { ... } # Overrides inherited method
package main;
tie *FH, 'NewHandle';
DESCRIPTION
This module provides some skeletal methods for handle-tying classes. See perltie for a list of the functions required in tying a handle to
a package. The basic Tie::Handle package provides a "new" method, as well as methods "TIEHANDLE", "PRINT", "PRINTF" and "GETC".
For developers wishing to write their own tied-handle classes, the methods are summarized below. The perltie section not only documents
these, but has sample code as well:
TIEHANDLE classname, LIST
The method invoked by the command "tie *glob, classname". Associates a new glob instance with the specified class. "LIST" would
represent additional arguments (along the lines of AnyDBM_File and compatriots) needed to complete the association.
WRITE this, scalar, length, offset
Write length bytes of data from scalar starting at offset.
PRINT this, LIST
Print the values in LIST
PRINTF this, format, LIST
Print the values in LIST using format
READ this, scalar, length, offset
Read length bytes of data into scalar starting at offset.
READLINE this
Read a single line
GETC this
Get a single character
CLOSE this
Close the handle
OPEN this, filename
(Re-)open the handle
BINMODE this
Specify content is binary
EOF this
Test for end of file.
TELL this
Return position in the file.
SEEK this, offset, whence
Position the file.
Test for end of file.
DESTROY this
Free the storage associated with the tied handle referenced by this. This is rarely needed, as Perl manages its memory quite well. But
the option exists, should a class wish to perform specific actions upon the destruction of an instance.
MORE INFORMATION
The perltie section contains an example of tying handles.
COMPATIBILITY
This version of Tie::Handle is neither related to nor compatible with the Tie::Handle (3.0) module available on CPAN. It was due to an
accident that two modules with the same name appeared. The namespace clash has been cleared in favor of this module that comes with the
perl core in September 2000 and accordingly the version number has been bumped up to 4.0.
perl v5.18.2 2013-11-04 Tie::Handle(3pm)