11-19-2012
Thanks, I indeed missed a statement, post #4 fixed (I prefer 'print' to the cryptic '1'). Column separators will be normalized to a single space after running this command while your solution preserve the existing separators.
10 More Discussions You Might Find Interesting
1. SuSE
Hello!
Why does my SuSE GNU/Linux machine swap?
I have a Gig of ram, currently 14MBs of free RAM, 724MB - buffers and caches...
That is 685MB of cached RAM, then kernel really should'nt have to swap, It should release cached memory in my thinkin...
It has only swaped 3MB's but still,... (3 Replies)
Discussion started by: Esaia
3 Replies
2. UNIX for Dummies Questions & Answers
Hi,
I knw its a silly question, but am a newbie to 'vi' editor. I'm forced to use this, hence kindly help me with this question.
How can i paste a chunk 'copied from' a different editor(gedit) in 'vi editor'?
As i see, p & P options does work only within 'vi'. (10 Replies)
Discussion started by: harishmitty
10 Replies
3. Shell Programming and Scripting
Hi All,
I am running a script , working very fine on cmd prompt. The problem is that when I open do crontab -e even after setting editor to vi by
set EDITOR=vi it does not open a vi editor , rather it do as below.....
/////////////////////////////////////////////////////
$ set... (6 Replies)
Discussion started by: aarora_98
6 Replies
4. Shell Programming and Scripting
In VI editor ctrl + g is used indicate the line number on which the cursor is placed...similarly is there a way to determine the column number of the cursor position..? (1 Reply)
Discussion started by: vijay_0209
1 Replies
5. UNIX for Dummies Questions & Answers
Hi,
I am attempting to replace several similar words with another word in vi. Here is what I have written for the script:
3dTcat -prefix SuperBrik_4WAY_HRF ../JULY10_2007A/results2TENT/stats.JULY10_2007A+tlrc ../JULY10_2007G/results2TENT/stats.JULY10_2007G+tlrc... (1 Reply)
Discussion started by: Jahn
1 Replies
6. Shell Programming and Scripting
This is an vi editor question. I do not know is this a right place to ask this question or not?
I have a file with the following contents,
10 11
20 21
30 31
I want to copy first column that is 10,20,30 after second column, so that output will look like the following,
10 11 10
20 21 20... (3 Replies)
Discussion started by: MeetP
3 Replies
7. Solaris
I am setting the size using "stty columns 120" . But I still get the prompt saying "terminal too wide " when I am in vi.
is there any time limit for this setting?
how to set the column size to 120 permanently?
Thanks in advance,
Devi (4 Replies)
Discussion started by: pvkdevi
4 Replies
8. UNIX for Dummies Questions & Answers
Hello Experts,
I'm a newbie so please excuse any wrong doings.
I have a file that looks like this.
abc def ghi jkl mno
def abc ghi mno jkl
ghi def mno jkl abc
I would like the file to look like this
abc def ghi jklmno
def abc ghi mnojkl
ghi def mno jklabc
in other... (3 Replies)
Discussion started by: fnebiolo
3 Replies
9. UNIX for Dummies Questions & Answers
I have text like this
M83-306 132 797
M83-312 145 685
M83-315 321 479
M83-319 654 193
M83-350 556 1184
M83-303 222 199
and I want to make it like this
M83-306 797
M83-312 685
M83-315 ... (9 Replies)
Discussion started by: muhnandap
9 Replies
10. UNIX for Dummies Questions & Answers
How do i remove a column using vi editor
Assuming the file to be of format
1: 010 0xad45 sp1 - 11:29:51.498583949 500249144 Event1 rst bcfe jhv rgc
456: 010 0xadb sp2 - 11:29:51.498600605 4464 Event0abcrd adabc aasd
45: 010 0x10 sp0 - 11:29:51.498614165 13560 Back adxca... (6 Replies)
Discussion started by: sp0
6 Replies
LEARN ABOUT DEBIAN
swiss::textfunc
SWISS::TextFunc(3pm) User Contributed Perl Documentation SWISS::TextFunc(3pm)
NAME
SWISS::TextFunc
DESCRIPTION
This module is designed to be a repository of functions that are repeatedly used during parsing and formatting of SWISS-PROT/TREMBL lines.
If more than two line types need to do aproximately the same thing then it is probably in here.
All functions expect to be called as package->function(param list)
listFromText
Takes a piece of text, a seperator regex and a seperator that may appear at the end. Returns an array of items that were seperated in
the text by that seperator. Takes care of null items (looses them for you).
textFromList
Takes an array of items, a separator, a terminating string, and a line width. Returns an array of strings, each ending with the
separator or the terminator with a width less than or equal to the width specified.
Seems to do the wrong thing for references - not sure why. Don't use it for that.
wrapText
Takes a string and a length. Returns an array of strings which are shorter or equal in length to length, spliting the string on white
space.
wrapOn ($firstLinePrefix, $linePrefix, $colums, $text[, @separators])
Wraps $text into lines with at most $colums colums. Prepends the prefixes to the lines. @separators is a list of expressions on which
to wrap. The expression itself is part of the upper line.
If no @separators are provided, the $text is wrapped at whitespace except in EC/TC numbers or at dashes that separate words.
First tries to wrap on the first item of @separators, then the next etc. If no wrap on any element of @separators or whitespaces is
possible, wraps into lines of exactly length $colums.
A special case is that the first item of @separators may be a reference to an array. This is used internally for wrapping FT VARIANT-
like lines.
Example:
wrapOn('DE ', 'DE ', 40,
'14-3-3 PROTEIN BETA/ALPHA (PROTEIN KINASE C INHIBITOR PROTEIN-1)',
's+')
returns ['14-3-3 PROTEIN BETA/ALPHA (PROTEIN ',
'KINASE C INHIBITOR PROTEIN-1)']
wrapOn('DE ', 'DE ', 40,
'14-3-3 PROTEIN BETA/ALPHA (PROTEIN KINASE C INHIBITOR PROTEIN-1)',
' (?=()', 's+')
returns ['14-3-3 PROTEIN BETA/ALPHA ',
'(PROTEIN KINASE C INHIBITOR PROTEIN-1)']
cleanLine
Remove the leading line Identifier and three blanks and trailing spaces from an SP line.
joinWith ($text, $with, $noAddAfter, @list)
Concatenates $text and @list into one string. Adds $with between the original elements, unless the postfix of the current string is
$noAddAfter. This is used to avoid inserting blanks after hyphens during concatenation. So unpleasant strings like 'CALMODULIN-
DEPENDENT' are avoided. Unfortunately a correct reassembly of strings like 'CARBON-DIOXIDE' is not done.
insertLineGroup ($textRef, $text, $pattern)
Inserts text block $text into the text referred to by $textRef. $text will replace the text block in $textRef matched by $pattern.
uniqueList (@list)
Returns a list in which all duplicates from @list have been removed.
currentSpDate
returns the current date in SWISS-PROT format
toMixedCase($text, @regexps)
Convert a text to mixed case, according to one or more regular expressions. In scalar context, returns the new text; in array context,
also returns the regexp with which the change was performed, or undef on failure. See corresponding item in SWISS::GN for more
details.
perl v5.10.1 2006-08-31 SWISS::TextFunc(3pm)