08-29-2013
thanks for the reply mate.
the code doesnt work if the comments are mixed with some text string like
Quote:
Some text --Comment
Or
some text /* comment */ more text
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello,
How can I take the following output:
outputa
outputb
outputc
and turn it into single line ouput, with a single space between each field like below:
outputa outputb outputc (7 Replies)
Discussion started by: LinuxRacr
7 Replies
2. Shell Programming and Scripting
Hi,
Can anyone help me for merge the following multi-line log which beginning with a number and time: into one line. For each line need to delete the return and add a space. Please see the red color line.
*****Original Log*****... (4 Replies)
Discussion started by: happyday
4 Replies
3. Shell Programming and Scripting
Hi,
Can anyone know how to use perl to merge the following multi-line information which beginning with "BAM" into one line. For each line need to delete the return and add a space. Please see the red color line.
******Org. Multi-line)
BAM admin 101.203.57.22 ... (3 Replies)
Discussion started by: happyday
3 Replies
4. Shell Programming and Scripting
Hello,
Did anyone know how to write a perl script to merge the multi-line into a single line where each line with start at timestamp
Input-->
timestamp=2009-11-10-04.55.20.829347;
a;
b;
c;
timestamp=2009-11-10-04.55.20.829347;
aa;
bb;
cc; (5 Replies)
Discussion started by: happyday
5 Replies
5. Shell Programming and Scripting
Hello
I did do a search and the past threads doesn't really solve my issue. (using various awk commands)
I need to combine the output from java -version into 1 line, but I am having difficulties.
When you exec java -version, you get:
java version "1.5.0_06"
Java(TM) 2 Runtime... (5 Replies)
Discussion started by: flagman5
5 Replies
6. Shell Programming and Scripting
HI,
My input file contains the data as like below:
A1234119993
B6271113
Bghjkjk
A1234119992
B6271113hi
Bghjkjkmkl
the output i require is :
A1234119993 B6271113 Bghjkjk
A1234119992 B6271113hi Bghjkjkmkl
Please help me in this.
Thanks (6 Replies)
Discussion started by: pandeesh
6 Replies
7. Shell Programming and Scripting
Hi,
My Oracle query is returing below o/p
----------------------------------------------------------
Ins trnas value
a lkp1 x
a lkp1 y
b lkp1 a
b lkp2 x
b lkp2 y ... (7 Replies)
Discussion started by: gvk25
7 Replies
8. Shell Programming and Scripting
i have to remove the commented (/* . . . .*/) part which starts in one line and ends in other.help me with generic code because i have 1000 to 10k lines code which i have to remove.
data one;
set work.temp;
input name age;
infile filename;
/* dfsdf
dsfs
sdfdf
dsdd
sdfsf
sdfsf
sfs... (4 Replies)
Discussion started by: saaisiva
4 Replies
9. Shell Programming and Scripting
Input File:
>Seq1
ASDADAFASFASFADGSDGFSDFSDFSDFSDFSDFSDFSDFSDFSDFSDFSD
>Seq2
SDASDAQEQWEQeqAdfaasd
>Seq3
ASDSALGHIUDFJANCAGPATHLACJHPAUTYNJKG
......
Desired Output File
>Seq1
ASDADAFASF
ASFADGSDGF
SDFSDFSDFS
DFSDFSDFSD
FSDFSDFSDF
SD
>Seq2 (4 Replies)
Discussion started by: patrick87
4 Replies
10. Shell Programming and Scripting
I want to read the log file which was generate from other command . And the output was having multi line in log files for job name and server name. But i need to make all the logs on one line
Source file
07/15/2018 17:02:00 TRANSLOG_1700 Server0005_SQL ... (2 Replies)
Discussion started by: ranjancom2000
2 Replies
LEARN ABOUT DEBIAN
bio::annotation::comment
Bio::Annotation::Comment(3pm) User Contributed Perl Documentation Bio::Annotation::Comment(3pm)
NAME
Bio::Annotation::Comment - A comment object, holding text
SYNOPSIS
$comment = Bio::Annotation::Comment->new();
$comment->text("This is the text of this comment");
$annotation->add_Annotation('comment', $comment);
DESCRIPTION
A holder for comments in annotations, just plain text. This is a very simple object, and justifiably so.
AUTHOR - Ewan Birney
Email birney@ebi.ac.uk
APPENDIX
The rest of the documentation details each of the object methods. Internal methods are usually preceded with a _
new
Title : new
Usage : $comment = Bio::Annotation::Comment->new( '-text' => 'some text for this comment');
Function: This returns a new comment object, optionally with
text filed
Example :
Returns : a Bio::Annotation::Comment object
Args : a hash with -text optionally set
AnnotationI implementing functions
as_text
Title : as_text
Usage :
Function:
Example :
Returns :
Args :
display_text
Title : display_text
Usage : my $str = $ann->display_text();
Function: returns a string. Unlike as_text(), this method returns a string
formatted as would be expected for te specific implementation.
One can pass a callback as an argument which allows custom text
generation; the callback is passed the current instance and any text
returned
Example :
Returns : a string
Args : [optional] callback
hash_tree
Title : hash_tree
Usage :
Function:
Example :
Returns :
Args :
tagname
Title : tagname
Usage : $obj->tagname($newval)
Function: Get/set the tagname for this annotation value.
Setting this is optional. If set, it obviates the need to
provide a tag to Bio::AnnotationCollectionI when adding
this object. When obtaining an AnnotationI object from the
collection, the collection will set the value to the tag
under which it was stored unless the object has a tag
stored already.
Example :
Returns : value of tagname (a scalar)
Args : new value (a scalar, optional)
Specific accessors for Comments
text
Title : text
Usage : $value = $self->text($newval)
Function: get/set for the text field. A comment object
just holds a single string which is accessible through
this method
Example :
Returns : value of text
Args : newvalue (optional)
value
Title : value
Usage : $value = $self->value($newval)
Function: Alias of the 'text' method
Example :
Returns : value of text
Args : newvalue (optional)
type
Title : type
Usage : $value = $self->type($newval)
Function: get/set for the comment type field. The comment type
is normally found as a subfield within comment sections
in some files, such as SwissProt
Example :
Returns : value of text
Args : newvalue (optional)
perl v5.14.2 2012-03-02 Bio::Annotation::Comment(3pm)