02-18-2010
poly to mono alphabet for every 2nd line
Hi,
Can anyone teach me by using perl.
let say i have an input file that content like below:
->line_01
aaabbbDDDTTTUSSy
->line_02
cccdddEEESSSGTTT
->line_03
xxxxyyyyzzzzzzzzzz
want the above input file content to become output file like below (every 2nd line after ->... become mono alphabet):
->line_01
abDTUSy
->line_02
cdESGTTT
->line_03
xyz
Thks..
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
What can i do to check that the input is all alphabet.. ? (4 Replies)
Discussion started by: XXXXXXXXXX
4 Replies
2. Shell Programming and Scripting
Hi,
I want to get the line count of the file from the 2nd line of the file ? The first line is header so want to skip that.
Thanks. (8 Replies)
Discussion started by: smc3
8 Replies
3. Linux
Hello,
Does anyone know about MONO PROJECT? It supports .NET on linux! I have downloaded its packages and installed it. But I don't know how to start it!!! Where can I find installed programs?! (5 Replies)
Discussion started by: HSN
5 Replies
4. UNIX for Dummies Questions & Answers
Hi,
Can anyone teach me by using perl.
let say i have an input file that content like below:
->line_01
aaabbbDDDTTTUSSy
->line_02
cccdddEEESSSGTTT
->line_03
xxxxyyyyzzzzzzzzzz
want the above input file content to become output file like below (every 2nd line after ->... become mono... (7 Replies)
Discussion started by: eisya10
7 Replies
5. Shell Programming and Scripting
I have a text file in the following format
CCCCCGCCCCCCCCCCcCCCCCCCCCCCCCCC
AAAATAAAAAAAAAAAaAAAAAAAAAAAAAAA
TGTTTTTTTTTTTTGGtTTTTTTTTTTTTTTT
TTTT-TTTTTTTTTCTtTTTTTTTTTTTTTTT
Each row/line will have 32 letters and each line will only have multiple occurrences of 2 letters out of a pool... (1 Reply)
Discussion started by: Lucky Ali
1 Replies
6. Shell Programming and Scripting
Hello,
I have to find out whether the last character is digit or alphabet. I manage to strip the last character but would need some help if there is one liner available to test the above.
set x = WM
echo $x | sed 's/.*\(.$\)/\1/'
O/P
M
I would like a one liner code to test whether the... (1 Reply)
Discussion started by: dixits
1 Replies
7. Shell Programming and Scripting
I need to take one column of data and put it into the following format:
1st line,2nd line
3rd line,4th line
5th line,6th line
...
Thanks! (6 Replies)
Discussion started by: batcho
6 Replies
8. Shell Programming and Scripting
I have a genotype.bim file where it contains information about SNPs and genotype. As a hypothetical example, let's say
genotype.bim
snp1 ... A G
snp2 ... G T
snp3 ... G T
snp4 ... G A
...
snpN ... C G
where first column identifies each SNP and 5th and 6th column has genotype... (3 Replies)
Discussion started by: johnkim0806
3 Replies
9. Shell Programming and Scripting
I wanted to know if there was a more efficient to do this. I was to setup a conditional for every letter of the alphabet, like so (I am parsing an array):
for i in "${arr}"; do
if ]; then
echo "$i starts with A"
else echo "$i does not start with A"
fi
done
I want to do this A-Z, is there... (6 Replies)
Discussion started by: sudo
6 Replies
10. Shell Programming and Scripting
Hi all,
I have a log file say Test.log that gets updated continuously and it has data in pipe separated format. A sample log file would look like:
<date1>|<data1>|<url1>|<result1>
<date2>|<data2>|<url2>|<result2>
<date3>|<data3>|<url3>|<result3>
<date4>|<data4>|<url4>|<result4>
What I... (3 Replies)
Discussion started by: pat_pramod
3 Replies
LEARN ABOUT DEBIAN
bio::symbol::alphabet
Bio::Symbol::Alphabet(3pm) User Contributed Perl Documentation Bio::Symbol::Alphabet(3pm)
NAME
Bio::Symbol::Alphabet - BSANE/BioCORBA compliant symbol list alphabet
SYNOPSIS
{
my $alphabet = Bio::Symbols::Alphabet->new(-symbols => [ @s ],
-subalphabets => [ @alphas ] );
my @symbols = $alphabet->symbols;
my @subalphas = $alphabet->alphabets;
if( $alphabet->contains($symbol) ) {
# do something
}
}
DESCRIPTION
Alphabet contains set of symbols, which can be concatenated to form symbol lists. Sequence string, for example, is stringified
representation of the symbol list (tokens of symbols).
This module was implemented for the purposes of meeting the BSANE/BioCORBA spec 0.3 only.
FEEDBACK
Mailing Lists
User feedback is an integral part of the evolution of this and other Bioperl modules. Send your comments and suggestions preferably to the
Bioperl mailing list. Your participation is much appreciated.
bioperl-l@bioperl.org - General discussion
http://bioperl.org/wiki/Mailing_lists - About the mailing lists
Support
Please direct usage questions or support issues to the mailing list:
bioperl-l@bioperl.org
rather than to the module maintainer directly. Many experienced and reponsive experts will be able look at the problem and quickly address
it. Please include a thorough description of the problem with code and data examples if at all possible.
Reporting Bugs
Report bugs to the Bioperl bug tracking system to help us keep track of the bugs and their resolution. Bug reports can be submitted via the
web:
https://redmine.open-bio.org/projects/bioperl/
AUTHOR - Jason Stajich
Email jason@bioperl.org
APPENDIX
The rest of the documentation details each of the object methods. Internal methods are usually preceded with a _
new
Title : new
Usage : my $obj = Bio::Symbol::Alphabet->new();
Function: Builds a new Bio::Symbol::Alphabet object
Returns : Bio::Symbol::Alphabet
Args : -symbols => Array ref of Bio::Symbol::SymbolI objects
-subalphas=> Array ref of Bio::Symbol::AlphabetI objects
representing sub alphabets
AlphabetI Interface methods
symbols
Title : symbols
Usage : my @symbols = $alphabet->symbols();
Function: Get/Set Symbol list for an alphabet
List of symbols, which make up this alphabet.
Returns : Array of Bio::Symbol::SymbolI objects
Args : (optionalalphabets) Array of Bio::Symbol::SymbolI objects
alphabets
Title : alphabets
Usage : my @alphabets = $alphabet->alphabets();
Function: Get/Set Sub Alphabet list for an alphabet
Sub-alphabets. E.g. codons made from DNAxDNAxDNA alphabets
Returns : Array of Bio::Symbol::AlphabetI objects
Args : (optional) Array of Bio::Symbol::AlphabetI objects
contains
Title : contains
Usage : if($alphabet->contains($symbol)) { }
Function: Tests of Symbol is contained in this alphabet
Returns : Boolean
Args : Bio::Symbol::SymbolI
perl v5.14.2 2012-03-02 Bio::Symbol::Alphabet(3pm)