Sponsored Content
Top Forums Shell Programming and Scripting add text in the middle of file Post 302176706 by summer_cherry on Wednesday 19th of March 2008 01:40:12 AM
Old 03-19-2008
input:
Code:
first
second
forth
fifth

output:
Code:
first
second
third
forth
fifth

Code:
line=`cat a | wc -l`
half=`expr $line / 2`
nawk -v s="$half" '{
if(NR<=s) 
print
}' a
echo "third"
nawk -v s="$half" '{
if(NR>s) 
print
}' filename

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

insert text into the middle of a original file

how do u insert text into a specific place in a file, say the middle for example, without changing the name for that file (1 Reply)
Discussion started by: mopimp
1 Replies

2. Shell Programming and Scripting

How to insert text into first line of the file and middle of the file?

Script 1 Pre-requisites Create a file with x amount of lines in it, the content of your choice. Write a script that takes two arguments. The first being a line of text, the second being your newly created file. The script should take the first argument and insert it into the very top (the... (3 Replies)
Discussion started by: ali hussain
3 Replies

3. Shell Programming and Scripting

add a string in the middle of the file

i want to add a string in a very top of a file without using VI or SED or AWK this is what ive done: (echo '0a'; echo 'LINE OF TEXT'; echo '.'; echo 'wq') | ed -s myfile to add astrng right in the middle i could have count the lines of the file and just chenge the address. ... (6 Replies)
Discussion started by: ciroredz
6 Replies

4. Shell Programming and Scripting

insert text in the middle of a file

I want to insert a text into the middle of a file (3 Replies)
Discussion started by: relle
3 Replies

5. UNIX for Dummies Questions & Answers

How to insert text in the middle of a file

Hey guys, how do we take a line of text as an argument from a user and then insert it in the middle of a file irrespective of the number of lines in the file. I am trying to do this without SED or AWK. Inserting it in the beginning and at the end is easy, but i am trying to accomplish inserting... (6 Replies)
Discussion started by: kartikkumar84@g
6 Replies

6. Shell Programming and Scripting

Script to add a single line to middle of text file.

I've got a configuration file that is filled with xml text statements for example: <...../> <...../> <...../> <data id="java-options" value="-server -Djava.security.policy..../> <...../> <...../> <...../> I want to write a korn shell script that will go to this specific line and add a... (2 Replies)
Discussion started by: progkcp
2 Replies

7. UNIX for Dummies Questions & Answers

Add string to middle of a file

Hi, I want to write a script that takes a file and a string as params and adds the string to the middle line of the file. Also, I want to output the results back to the original file passed without using temp files. I am very much new to UNIX so this is all a little like black magic to me at... (15 Replies)
Discussion started by: Chiefos
15 Replies

8. Shell Programming and Scripting

How to read from middle of a file for a particular text

Hi, Below is my issue which I desperately need and I want a shell script which can do this job. 1. There are 10 log files in a particular location. 2. open each log file. Goto to the end of the file. From the end go up to find a particular text. From this particular text till the end of... (3 Replies)
Discussion started by: kashriram
3 Replies

9. Shell Programming and Scripting

Adding Text To Middle Of File

Hi I am trying to write a bash script to add a line of text to the middle of a file. The way I worked it out was to calculate the number of lines and divide by 2. The file I am using is called newfile and it just contains lines of data. The new file I have created I have called midfile and... (7 Replies)
Discussion started by: BundBash
7 Replies

10. Shell Programming and Scripting

How to insert text in the middle of a file?

Hi, So far i've made a script that takes two argument, 1st is the contents and the 2nd is the named file. At the moment i've managed to insert new contents as a new line at the top, but i want to ask how can you insert contents in the middle of the file? Source Code #!/bin/bash #Write... (3 Replies)
Discussion started by: zen10
3 Replies
Compound(3)						User Contributed Perl Documentation					       Compound(3)

NAME
Tk::Compound - Create multi-line compound images. SYNOPSIS
use Tk::Compound; $image = $widget->Compound(name,options); $image->Line(options); $image->Text(options); $image->Bitmap(options); $image->Image(options); $image->Space(options); DESCRIPTION
Compound image types can be used to create images that consists of multiple horizontal lines; each line is composed of a series of items (texts, bitmaps, images or spaces) arranged from left to right. Compound images are mainly used to embed complex drawings into widgets that support the -image option. As shown in the EXAMPLE section below, a compound image can be used to display a bitmap and a text string simutaneously in a Tk Button widget. Compound images can only be used on windows on the same display as, and with the same pixel depth and visual as the $widget used to create them. CREATING COMPOUND IMAGES
Compounds are created using $widget->Compound. Compounds support the following options: -background => color Specifies the background color of the compound image. This color is also used as the default background color for the bitmap items in the compound image. -borderwidth => pixels Specifies a non-negative value indicating the width of the 3-D border drawn around the compound image. -font => font Specifies the default font for the text items in the compound image. -foreground => color Specifies the default foreground color for the bitmap and text items in the compound image. -padx => value Specifies a non-negative value indicating how much extra space to request for the compound image in the X-direction. The value may have any of the forms acceptable to Tk_GetPixels(3). -pady => value Specifies a non-negative value indicating how much extra space to request for the compound image in the Y-direction. -relief => value Specifies the 3-D effect desired for the background of the compound image. Acceptable values are raised, sunken, flat, ridge, and groove. -showbackground => value Specifies whether the background and the 3D borders should be drawn. Must be a valid boolean value. By default the background is not drawn and the compound image appears to have a transparent background. IMAGE COMMAND
When a compound image is created, Tk also creates a new object. This object supports the configure and cget methods described in Tk::options which can be used to enquire and modify the options described above. The object also supports the following methods: $compound->Line?(option = value ...>)? Creates a new line at the bottom of the compound image. Lines support the following options: -anchor value Specifies how the line should be aligned along the horizontal axis. When the values are w, sw or nw, the line is aligned to the left. When the values are c, s or n, the line is aligned to the middle. When the values are e, se or ne, the line is aligned to the right. -padx => value Specifies a non-negative value indicating how much extra space to request for this line in the X-direction. $compound->Itemtype?(option = value ...>)? Creates a new item of the type Itemtype at the end of the last line of the compound image. All types of items support these following common options: -anchor value Specifies how the item should be aligned along the vertical axis. When the values are n, nw or ne, the item is aligned to the top of the line. When the values are c, w or e, the item is aligned to the middle of the line. When the values are s, se or sw, the item is aligned to the bottom of the line. -padx => value Specifies a non-negative value indicating how much extra space to request for this item in the X-direction. -pady => value Specifies a non-negative value indicating how much extra space to request for this item in the Y-direction. item-type can be any of the following: $compound->Bitmap?(option = value ...>)? Creates a new bitmap item of at the end of the last line of the compound image. Additional options accepted by the bitmap type are: -background => color Specifies the background color of the bitmap item. -bitmap => name Specifies a bitmap to display in this item, in any of the forms acceptable to Tk_GetBitmap(3). -foreground => color Specifies the foreground color of the bitmap item. $compound->Image?(option = value ...>)? Creates a new image item of at the end of the last line of the compound image. Additional options accepted by the image type are: -image => name Specifies an image to display in this item. name must have been created with the image create command. $compound->Space?(option = value ...>)? Creates a new space item of at the end of the last line of the compound image. Space items do not display anything. They just acts as space holders that add additional spaces between items inside a compound image. Additional options accepted by the image type are: -width => value Specifies the width of this space. The value may have any of the forms acceptable to Tk_GetPixels(3). -height => value Specifies the height of this space. The value may have any of the forms acceptable to Tk_GetPixels(3). $compound->Text?(option = value ...>)? Creates a new text item of at the end of the last line of the compound image. Additional options accepted by the text type are: -background => color Specifies the background color of the text item. -font => name Specifies the font to be used for this text item. -foreground => color Specifies the foreground color of the text item. -justify value When there are multiple lines of text displayed in a text item, this option determines how the lines line up with each other. value must be one of left, center, or right. Left means that the lines' left edges all line up, center means that the lines' centers are aligned, and right means that the lines' right edges line up. -text => string Specifies a text string to display in this text item. -underline value Specifies the integer index of a character to underline in the text item. 0 corresponds to the first character of the text displayed in the text item, 1 to the next character, and so on. -wraplength value This option specifies the maximum line length of the label string on this text item. If the line length of the label string exceeds this length, it is wrapped onto the next line, so that no line is longer than the specified length. The value may be specified in any of the standard forms for screen distances. If this value is less than or equal to 0 then no wrapping is done: lines will break only at newline characters in the text. EXAMPLE
The following example creates a compound image with a bitmap and a text string and places this image into a Button(n) widget. Notice that the image must be created using the widget that it resides in. my $b = $parent->Button; my $c = $b->Compound; $b->configure(-image => $c); $c->Line; $c->Bitmap(-bitmap => 'warning'); $c->Space(-width => 8); $c->Text(-text => "Warning", -underline => 0); $b->pack; KEYWORDS
image(n), Tix(n) perl v5.16.3 2014-06-10 Compound(3)
All times are GMT -4. The time now is 11:04 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy