Hi,
I have a set of file names say:
file1
file2
file3
..
filen
I may just do a ls -l or however it works to read this list into an array...
I need to pick the last file name that is "filen" from the list...
your help is greatly appreciated.....hope im clear on my question... (7 Replies)
I am trying to use a script to replace the header of each file, whose filename are stored within the array $test, using the sed command within a Perl script as follows:
$count = 0;
while ( $count < $#test )
{
`sed -e 's/BIOGRF 321/BIOGRF 332/g' ${test} > 0`;
`cat 0 >... (2 Replies)
Hi,
Is there any way I can grep an array against another array?
Basically here's what I need to do.
There will be an array containing some fixed texts and I have to check whether some files contain these lines. Reading the same files over and over again for each different pattern doesnt seem... (1 Reply)
Hi Everyone,
#!/usr/bin/perl
use strict;
use warnings;
my @test=("a;b;qqq;c;d","a;b;ggg;c;d","a;b;qqq;c;d");
would like to split the @test array into two array:
@test1=(("a;b;qqq;c;d","a;b;qqq;c;d"); and @test2=("a;b;ggg;c;d");
means search for 3rd filed.
Thanks
find the... (0 Replies)
I have a list of items in array say @array1=(apple=2,orange=3,peas=15,spinach=50);
Another array has values say @array2=(apple,orange,plums,pineapple);
I need to display a list if @array2 values is present in @array1 .else I need to print of the form(The final o/p may look like this.)
OUTPUT... (5 Replies)
Hi everyone
I have one question about using array in perl. let say I have several log file in one folder.. example
test1.log
test2.log
test3.log
and the list goes on..
how to make an array for this file? It suppose to detect log file in the current directory and all the log file will... (3 Replies)
I have an array and two variables as below,
I need to check if $datevar is present in $filename.
If so, i need to replace $filename with the values in the array.
I need the output inside an ARRAY
How can this be done.
Any help will be appreciated. Thanks in advance. (2 Replies)
Hi all,
Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM.
Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers.
At the moment am... (3 Replies)
okay so my job is requiring me to learn perl and i have never had any type of programming language... ever.
So i need to take a file that has data (nodes/points) with x, y, and z components.
Example of what the file contains is below:
RANDOM TEXT
RANDOM TEXT
Node # x pos ... (23 Replies)
Discussion started by: dets34
23 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)