11-07-2011
Thanks.. It worked
But can you explain what you did?
10 More Discussions You Might Find Interesting
1. AIX
USERS="me you jim joe sue"
for user in ${USERS}; do
rmuser -p $user
usrdir=`cat /etc/passwd|grep $user|awk -F":" '{ print $6 }'`
rm -fr `cat /etc/passwd|grep $user|awk -F":" '{ print $6 }'`
echo Deleting: $user '\t' REMOVING: $usrdir
done
This is for AIX ONLY!!! but easily ported to... (0 Replies)
Discussion started by: Optimus_P
0 Replies
2. UNIX for Dummies Questions & Answers
Say I have a log file called is there a way to clean out certain files in this log by or when I go to VI this file it tells me and
I am guessing this means the file has become to large to append with VI so I was wondering if there was command with some argument to clean this out?
Thanks ... (6 Replies)
Discussion started by: rocker40
6 Replies
3. UNIX for Dummies Questions & Answers
Hello all,
I have a crontab entry to clean up a file system once a week that is used as tmp directory.
00 12 * * 0 find /mytmp -mtime +2 -exec rm {} \;
The job starts ok but I always get an error message in mails because it is a file system and there is a directory lost+found that should... (1 Reply)
Discussion started by: qfwfq
1 Replies
4. UNIX for Dummies Questions & Answers
Hello *!
Just a short question. Where on the system i can find core files. I have one SUN server (Solaris 8) and from time to time I must clean core files on it. But i am not sure where i can find those files. Thank you in advance. :) (5 Replies)
Discussion started by: ghost01
5 Replies
5. Shell Programming and Scripting
Dear,
I have an input file and need to clean and get the following output:
ATM1/0/0,19072000,97848000
ATM1/0/1,18015000,83270000
ATM1/0/2,16879000,89491000
ATM1/0/3,21684000,122096000
Input file:
show interface ATM1/0/0 | inc rate
Interface ATM1/0/0 queueing strategy: PXF... (3 Replies)
Discussion started by: He2
3 Replies
6. UNIX for Dummies Questions & Answers
Open to a sed/awk/or perl alternative so that i can stick command into my bash script.
This is a problem I resolve using a combination of cut commands - but that is getting convoluted. So would really appreciate it if someone could provide a better solution which basically replaces all... (3 Replies)
Discussion started by: svn
3 Replies
7. UNIX for Dummies Questions & Answers
Hello,
I am trying to analyze data I recently ran, and the only way to efficiently clean up the data is by using an awk file.
I am very new to awk and am having great difficulty with it. In $8 and $9, for example, I am trying to delete numbers that contain 1.
I cannot find any tutorials that... (20 Replies)
Discussion started by: carmar87
20 Replies
8. Shell Programming and Scripting
Hi ,
I have the below source data, I need to clean the data in 2nd,4th,5th columns.
Source Data
RECORD,CASH_TRANS,BEJING,AUG2011/CASH_TRANS,Y/N150/CASH_TRANS,N/201108
RECORD,CASH_TRANS,INDIA,AUG2011/CASH_TRANS,Y/NC110/CASH_TRANS,N/201108... (7 Replies)
Discussion started by: mora
7 Replies
9. Shell Programming and Scripting
HI ,
I am getting the source data as below.
Source Data
CDR_Data,,,,,
F1,F2,F3,F4,F5,F6
5,5,6,7,8,7
6,6,g,,,
7,7,76,,,
8,8,gt,,,
9,9,df ,d,d,d
,,,,, (4 Replies)
Discussion started by: wangkc
4 Replies
10. Shell Programming and Scripting
I have some small problem with my code.
data.html
<TD class="statuscol2">c</TD>
<TD class="statuscol3">18</TD>
<TD class="statuscol4"><SPAN TITLE="#04">test4</SPAN></TD>
<TD... (4 Replies)
Discussion started by: Jotne
4 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)