06-04-2010
Moving data from a specified column/row to another column/row
Hello,
I have an input file like the following:
11_3_4
2_1_35
3_15__
_16989
Where '_' is a space. The data is in a table. Is there a way for the program to prompt the user for x1,y1 and x2,y2, where x1,y1 is the desired number (for example x=6 y=4 is a value of 4) and move to a desired spot (x2,y2).
In this example, if (x1=6 y1=4) and (x2=3 y2=1), then the new table will be:
1193_4
2_1_35
3_15__
_1698_
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi all,
I have a file with several columns of data, eg:
A B C D
1 2 5 1
2 2 2 2
8 4 4 4
4 2 3 4
10 9 4 4
9 7 1 2
I need to get the values from, say, column B and place them into a string separated by a semicolon, eg:
2;2;4;2;9;7
Does... (4 Replies)
Discussion started by: danhodges99
4 Replies
2. Shell Programming and Scripting
Hi,
I want to write a shell script which increments a particular column in a row from a text file and then adds another row below the current row with the incremented value .
For Eg .
if the input file has a row :
abc xyz lmn 89 lm nk o p
I would like the script to create something like... (9 Replies)
Discussion started by: aYankeeFan
9 Replies
3. Shell Programming and Scripting
Dear friends,
Below is my program and current output. I wish to have 3 or 4 column output in order to accomodate in single page. i do have subsequent command to process after user enter the number.
Program
COUNT=1
for MYDIR in `ls /`
do
VOBS=${MYDIR}
echo "${COUNT}. ${MYDIR}"
... (4 Replies)
Discussion started by: baluchen
4 Replies
4. Shell Programming and Scripting
Hello Experts,
I am new in scripting. I would like to filter and migrate data from row to column by awk. Thanks in advance.
For example
FileA
abc
1
2
3
Xyz3
4
1
5
bcd1
Output :
Abc 1 2 3
Xyz3 4 1 5
bcd1 3 5 6 (5 Replies)
Discussion started by: shah09
5 Replies
5. Shell Programming and Scripting
Hi, I need somebody's help with sorting data with awk.
I've got a file:
10 aaa 4584
12 bbb 6138
20 ccc 4417
21 ddd 7796
10 eee 7484
12 fff ... (5 Replies)
Discussion started by: killerbee
5 Replies
6. Shell Programming and Scripting
Hi Friends,
I have a single column data like below.
1
2
3
4
5
I need the output like below.
0
1
2
3
4
where each row (including first row) subtracting from first row and the result should print below like the way shown in output file.
Thanks
Sid (11 Replies)
Discussion started by: ks_reddy
11 Replies
7. UNIX for Dummies Questions & Answers
file with this content
awk 'NR==1 {print $4} && NR==2 {print $5}' file
The error is shown with syntax error; what can be done (4 Replies)
Discussion started by: cdfd123
4 Replies
8. Shell Programming and Scripting
Hi
FileA.txt
E_TIM 16,
ETE 15,
EOND 26,
EEC 81,
E_1 un,
E_2 un,
E_3 un,
E_4 284,
E_TIM 17,
ETE 15,
EOND 29,
EEC 82,
E_1 un,
E_2 un,
E_3 un,
E_4 249, (6 Replies)
Discussion started by: asavaliya
6 Replies
9. Shell Programming and Scripting
HI Guys,
I just want to replace data for First Column and Row Cell(1,1)
Input :-
Hello A B C
X 1 2 3
Y 4 5 6
Z 7 8 9
Output:-
Byee A B C
X 1 2 3
Y 4 5 6
Z 7 8 9
From Hello to Byee .....And The Each file have Different String. (3 Replies)
Discussion started by: pareshkp
3 Replies
10. Shell Programming and Scripting
HI Guys,
I have below Input :-
X L1 5
Y L1 10
Z L1 15
X L2 20
Y L2 12
Z L2 15
X L3 100
Y L3
Z L3 300
Output:-
ID L1 L2 L3
X 5 10 15
Y 20 12 15
Z 100 Null 300 (11 Replies)
Discussion started by: pareshkp
11 Replies
LEARN ABOUT SUSE
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.12.1 2007-11-08 Table(3)