sort -k 1,2 file | awk '{print $1,$2}' | uniq -d > temp #Identifies the reduntant values and stores it in a temp file
while read i
do
row1=$(grep "$i" file | head -1) #Takes the first row from the redundant rows
row2=$(grep "$i" file | tail -1) #Takes the second row from the redundant rows
diff=$(grep "$i" file | awk '{gsub(/[a-zA-Z: ]+/," ")
m=split($3,a," ");
for (i=1;i<=m;i++)
if (NR==1) b[i]=a[i]; else print a[i] - b[i] }') #Finds the difference between the rows
if [ $diff -lt 0 ];
then
echo "$row2 moved to new file"
echo $row2 >> new_file #With the difference the least row is found and stored in another file
else
echo "$row1 moved to new file"
echo $row1 >> new_file
fi
done < temp
---------- Post updated at 03:08 AM ---------- Previous update was at 03:06 AM ----------
By comparing the above two comments, [pamu and myself], you can see how powerful awk is...
This User Gave Thanks to sathyaonnuix For This Post:
I have a question
I have like 19 different list which contains the name of the server but what I need is just unique ones.
First thing I need to do is just make a unique list within the list itself
i.e. delete anything that is repeated inside the list
like for example
in list1
i... (1 Reply)
Hello experts,
I am new to this group and to 'SED' and 'AWK'. I have data (text file) with 5 columns (C_1-5) and 100s of lines (only 10 lines are shown below as an example). I have to find or select only the id numbers (C-1) of specific lines with '90' in the same line (of C_3) AND with '20' in... (6 Replies)
Hi
My pipe delimited .txt file contains rows with 10 columns.
Can anyone advise how I output to file only those rows with the letters ‘ci'
as the first 2 characters in the 3rd column ?
Many thanks (4 Replies)
In a table, date is stored in a column as "2011-01-4".
If I write query to get the dates > "2011-01-06" , then the date "2011-01-4" is also listed. The date stored in the column is a varchar datatype. So how can I make a query to not display the date "2011-01-4" ? Is there any solution ? Thank... (4 Replies)
I have two arrays DIST(1:NCOF) and X(1:NX)
Let NCOF = 5 and NX = 15, with
DIST = and
X =
I want to create an array that puts a zero if DIST is outside the region in X, otherwise putting 1.
In this example I should get
RES =
Using DIST = would give RES =
The values in... (6 Replies)
Hi, all:
I am not familiar with unix,and just started awk scripts. I want to retrieve lines that have the first 4 columns with different values. For example, the input is like this (tab delimited file with one header)
r1 A A A A x
r2 A B B A x
r3 B B B B x
the output should be (header is... (15 Replies)
Hi Guys !
i want to search a record in file by matching two values in a record in two different columns
suppose i have 3 columns
and i want to select all those values from col1 for which in col3 has a specific value
e.g select all "john" from column1 where column 3 has a value of "20"
... (9 Replies)
Hi,
I have a file with the following columns:
361459 447394 CHL1
290282 290282 CHL1
361459 447394 CHL1
361459 447394 CHL1
178352861 178363529 AGA
178352861 178363529 AGA
178363657 178363657 AGA
Essentially, using CHL1 as an example. For any line that has CHL1 in... (2 Replies)
Hello, everyone
I am beginner for shell programming. I want to print all lines that have the same values in first two columns
data:
a b 1 2
a a 3 4
b b 5 6
a b 4 6
what I expected is :
a a 3 4
b b 5 6
but I searched for one hour in... (2 Replies)
Hi, everyone
I have a dataset like this:
A B C D
A C
C D E
F G H
F D K
Y
X A
K K C Gsome of columns have no values in each line. I want to print all lines that have 1/2/3/4 values, export separately to four files. What I expected is like this:
file1
Y
file 2
A C
X Afile 3... (3 Replies)
Discussion started by: nengcheng
3 Replies
LEARN ABOUT DEBIAN
tk::tablematrix::spreadsheethiderows
TableMatrix::SpreadsheetHideRows(3pm) perl/Tk Documentation TableMatrix::SpreadsheetHideRows(3pm)NAME
Tk::TableMatrix::SpreadsheetHideRows - Table Display with selectable hide/un-hide of rows
SYNOPSIS
use Tk;
use Tk::TableMatrix::SpreadsheetHideRows
my $t = $top->Scrolled('SpreadsheetHideRows',
-selectorCol => 3,
-expandData => $hashRef,
-rows => 21, -cols => 11,
-width => 6, -height => 6,
-titlerows => 1, -titlecols => 1,
-variable => $arrayVar,
-selectmode => 'extended',
-resizeborders => 'both',
-titlerows => 1,
-titlecols => 1,
-bg => 'white',
);
DESCRIPTION
Tk::TableMatrix::SpreadsheetHideRows is a Tk::TableMatrix::Spreadsheet-derived widget that implements a Spreadsheet-like display of tabular
information, where some of the rows in the table can be expanded/hidden by clicking a '+/-' selector in the row. This can be used to
display top-level information in a table, while allowing the user to expand certain table rows to view detail-level information.
See demos/SpreadsheetHideRows in the source distribution for a simple example of this widget
Widget-specific Options
In addition the standard Tk::TableMatrix widget options. The following options are implemented:
-selectorCol
Column number where the +/- selector will appear. Clicking on the +/- selector will expand/hide the detail information in the table for a
particular row.
-selectorColWidth
Width of the column used to display the +/- selector. Defaults to 2
-expandData
Hash ref defining the detail-level data displayed when a row is expanded (by clicking the +/- selector). This hash ref should have the
following structure:
$expandData = {
row1 => { tag => 'detailDataTag',
data => $detailData,
spans=> $spanData,
expandData => $subLevelData
},
row2 => {
.
.
}
Where:
row1, row2, ... Row numbers that will be expandable.
tag => 'detailDataTag' Tag name that will be applied to the detail data.
(optional)
$detailData 2D Array of detail-data to be displayed when
the row is expanded.
e.g. [ [ r1c1, r1c2, r1c3 ],
[ r2c1, r2c2, r2,c3] ]
$spans 1D array of span information (optional) to be
used for display of the detail information.
e.g. [ col2 => "rows,cols", col4 => "rows,cols", ... ]
$subLevelData Optional Recursive expandData used to hold detail-data of detail-data.
MEMBER DATA
The following items are stored as member data
defaultCursor
Name of the mouse cursor pointer that is used for normal (i.e. non-title, non-indicator) cells in the widget. This is set to the value of
the $widget->cget(-cursor) option when the widget is created.
indRowCols
Hash ref of Row/Cols indexes where there are indicators stores. This is a quick lookup hash built from _expandData.
_expandData
Internal version of the expandData hash. Any sub-detail data (i.e. expand data that is at lower levels of expandData) that is visible is
placed at the top level of this hash, for keeping track of the visible expandData.
Widget Methods
In addition the standard Tk::TableMatrix widget method. The following methods are implemented:
showDetail
Shows (i.e. expands the table) the detail data for a given row. This method is called when a user clicks on an indicator that is not
already expanded.
Usage:
$widget->showDetail($row);
# Shows the detail data for row number $row
hideDetail
Hides the detail data for a given row. This method is called when a user clicks on an indicator that is already expanded.
Usage:
$widget->hideDetail($row);
# Hides the detail data for row number $row
Tk1.23 2007-01-09 TableMatrix::SpreadsheetHideRows(3pm)
12-27-2012
