How can find the intersection between files
for Example:
file1
entry1
entry2
entry3
entry33
file2
entry2
entry4
entry5
.
.
.
.
the output should be
entry2 (9 Replies)
hi All,
Thi sis very urgent.
I have large files with pipe delimited.
For example:
1.txt
1001024|120|9|-0.0|#|
1001025|120|9|#|
1001026|120|9|#|
1001032|120|2|-0.0|#|
1002026|110|9|#|
1002027|110|9|-0.0|#|
1002028|120|1|1.0|#|
I need to replace the 4th filed if it is # by |-|
my... (2 Replies)
I have a input file that has some common values in 1st,2nd and 3rd columns. 4th and 5th are different. Now I would like to print the mean of the fourth column of similar values in 1st.2nd and 3rd columns along with all the values in 5th column.
input
NM_0 1.22 CR5 0.4 n_21663... (10 Replies)
Hi,
A piece of script from Perl-cookbook I do not understand, and post here for explanation.
The purpose is to find the element in either array (union), and in both array (intersection). Thank you in advance.
@a=qw(1 3 5 6 7 8);
@b=qw(2 3 5 7 9);
foreach $e (@a, @b) {$union{$e}++ &&... (3 Replies)
Hello,
i need to get the ls output in 2 columns.1st column the directories and 2nd the files...
Also each column must be sorted by time...
For example if the >>ls command gives me this :
/dir2 /dir /dir1
/dir3 file1 file2
I need to take this :
/dir file1
/dir1 ... (15 Replies)
Hi Friends,
I would like to be helped for the following issue I am currently stuck with
I have two files like the following
tom ram 10 20
hey bye 11 12
bus cat 20 30
put but 25 30
jak mok 11 12
fil don 76 57
bus cat 23 45
pan ban 09 78
put but 45 67
kis mis 23 45
I would like... (2 Replies)
Hi group,
Can you please tell how to delete specific columns from a file.
I know something like
awk -F, '{ print $1" "$2" "15 }' input.txt > output.txt will delete all other columns. But this is in a way to copy some particular columns.
But is there any other way to select just some... (11 Replies)
I am trying to find a specific set of characters in a long file. I only want to find the characters in column 265 for 4 bytes.
Is there a search for that? I tried cut but couldn't get it to work.
Ex. I want to find '9999' in column 265 for 4 bytes. If it is in there, I want it to print... (12 Replies)
Hi
I have a file which is tab-delimited. Now, I'd like to print the lines which have "chr6" string in both first and second columns. Could anybody help? (3 Replies)
Hi,
I like to intersect two files based on their first columns. Here is the code which does the trick for me:
awk 'NR==FNR{A;next}$1 in A' file1 file2
However, this only looks for exact matches between the two files in the first column. I need them to be printed even if part of the string... (10 Replies)
Discussion started by: a_bahreini
10 Replies
LEARN ABOUT CENTOS
tk::table
Table(3) User Contributed Perl Documentation Table(3)NAME
Tk::Table - Scrollable 2 dimensional table of Tk widgets
SYNOPSIS
use Tk::Table;
$table = $parent->Table(-rows => number,
-columns => number,
-scrollbars => anchor,
-fixedrows => number,
-fixedcolumns => number,
-takefocus => boolean);
$widget = $table->Button(...);
$old = $table->put($row,$col,$widget);
$old = $table->put($row,$col,"Text"); # simple Label
$widget = $table->get($row,$col);
$cols = $table->totalColumns;
$rows = $table->totalRows;
$table->see($widget);
$table->see($row,$col);
($row,$col) = $table->Posn($widget);
DESCRIPTION
Tk::Table is an all-perl widget/geometry manager which allows a two dimensional table of arbitary perl/Tk widgets to be displayed.
Entries in the Table are simply ordinary perl/Tk widgets. They should be created with the Table as their parent. Widgets are positioned in
the table using:
$table->put($row,$col,$widget)
If $widget is not a reference it is treated as a string, and a Lable widget is created with the string as its text.
All the widgets in each column are set to the same width - the requested width of the widest widget in the column. Likewise, all the
widgets in each row are set to the same height - the requested height of the tallest widget in the column.
A number of rows and/or columns can be marked as 'fixed' - and so can serve as 'headings' for the remainder the rows which are scrollable.
The requested size of the table as a whole is such that the number of rows specified by -rows (default 10), and number of columns specified
by -columns (default 10) can be displayed.
If the Table is told it can take the keyboard focus then cursor and scroll keys scroll the displayed widgets.
The Table will create and manage its own scrollbars if requested via -scrollbars.
The table can be emptied using
$table->clear
the widgets which were in the table are destroyed.
The Tk::Table widget is derived from a Tk::Frame, so inherits all its configure options.
BUGS / Snags / Possible enhancements
o Very large Tables consume a lot of X windows.
o No equivalent of pack's -anchor/-pad etc. options
SEE ALSO
Tk::grid, Tk::HList, Tk::TableMatrix, Tk::MListbox, Tk::Columns
perl v5.16.3 2014-06-10 Table(3)