#!/bin/bash
while read value; do
len=${#value}
center=`expr $len / 2`
firsthalf=${value:0:center}
secondhalf=${value:center:len}
if [ "$firsthalf" == "$secondhalf" ]; then
echo "$value"
fi
done <values >truedupes
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)
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)
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)
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)
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)
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)
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)
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)
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 DEBIAN
layout::manager::axis
Layout::Manager::Axis(3pm) User Contributed Perl Documentation Layout::Manager::Axis(3pm)NAME
Layout::Manager::Axis - Compass-like resizing managers
DESCRIPTION
Axis is very similar to Compass with one exception: Components added to the east and west consume space on the sides of of the north and
south.
Components at the north and south are resized when east and west components are added.
+--------------------------------+
| x | north | x |
+-----+--------------------+-----+
| | | |
| w | | e |
| e | center | a |
| s | | s |
| t | | t |
| | | |
+-----+--------------------+-----+
| x | south | x |
+--------------------------------+
The x boxes above will effectively be dead-space. No components will occupy those areas.
Why, you ask? Some components (such as axes on a chart, for which this manager is named) need to be the exact same hight or with as the
center component. If the chart area is represented by the center area and an axis is positioned to the west, it needs to know how big the
center is to accurately draw tick marks.
SYNOPSIS
$cont->add_component($comp1, 'north');
$cont->add_component($comp2, 'east');
my $lm = Layout::Manager::Axis->new;
$lm->do_layout($cont);
POSITIONING
When you add a component with add_component the second argument should be one of: north, south, east, west or center. Case doesn't matter.
You can also just provide the first letter of the word and it will do the same thing.
METHODS
do_layout
Size and position the components in this layout.
AUTHOR
Cory Watson, "<gphat@cpan.org>"
COPYRIGHT & LICENSE
Copyright 2008 - 2010 Cory G Watson
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.12.3 2011-05-16 Layout::Manager::Axis(3pm)