Sponsored Content
Top Forums Shell Programming and Scripting Extract regular expression and line below Post 302691809 by pathunkathunk on Saturday 25th of August 2012 07:29:06 PM
Old 08-25-2012
Thanks, agama, but with the following command I get the following error:
Code:
awk -F \| ' /^>gi/ { printf( ">%s\n", $4 ); getline print; }' test3.fa

awk: syntax error at source line 1
context is
/^>gi/ { printf( ">%s\n", $4 ); getline >>> print <<< ; }
awk: illegal statement at source line 1

Code:
cat test3.fa 
>gi|299507456|gb|GL349621.1| Acyrthosiphon pisum unplaced genomic scaffold Scaffold1, whole genome shotgun sequence
TTTACAATTGCTATTGTAACAATATATCAGGAGCCTTGTATTAAATTTTCACGCATTTTTACCAAACAAATAAAATTTTATTGAT
>gi|299507455|gb|GL349622.1| Acyrthosiphon pisum unplaced genomic scaffold Scaffold2, whole genome shotgun sequence
GTATGCGCGCATCTCCATACCGTCCGATAAATTCGCAGTAAAAAAAATGTGATTCACATTGTCGATTATAATAAAAAAAT
>gi|299507454|gb|GL349623.1| Acyrthosiphon pisum unplaced genomic scaffold Scaffold3, whole genome shotgun sequence
AATATTAAATAATTAATCTAAATAAATTAAATACCTCATTAGTCATTAACACACATTTTTTTCTTAGTTTTAATGTAT

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Regular expression matching a new line

I have written a script to test some isdn links in my network and I am trying to format the output to be more readable. Each line of the output has a different number of digits as follows... Sitename , spid1 12345678901234 1234567890 1234567 , spid2 1234567890 1234567890 1234567 Sitename , ... (1 Reply)
Discussion started by: drheams
1 Replies

2. Shell Programming and Scripting

Extract a substring using regular expression

Hello: I'm trying to extracta a matching substring from a string using regular expression. I need to extract the date part of any giving string. All input string will have date in YYYYMMDD format in them, but it can be anywhere in the string. Eg. The_Mummy20080125_New... (2 Replies)
Discussion started by: apraja
2 Replies

3. Linux

Regular expression to extract "y" from "abc/x.y.z" .... i need regular expression

Regular expression to extract "y" from "abc/x.y.z" (2 Replies)
Discussion started by: rag84dec
2 Replies

4. Shell Programming and Scripting

New line problem of regular expression

could anybody tell me how i can add/append a new line using regular expression in vi on AIX? i've tried several ways before, but all of them failed. e.g. :%s/$/\n/ :%s/^/\v\r/ :( (1 Reply)
Discussion started by: wrl
1 Replies

5. Shell Programming and Scripting

regular expression format string in one line.

Hi All, @months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec); $day=091023; $day_combine = $day; $day_combine =~ s/({2})({2})({2})/20$1-$months-$3/; Instead of three lines, is possible to combine the last two lines into a single line? means no need assign $day to $day_combine... (2 Replies)
Discussion started by: jimmy_y
2 Replies

6. Shell Programming and Scripting

Grep regular expression to get part of a line

Hi I just started on GNU Grep with regex and am finding it very challenging and need to ask for help already... here is the problem, I have a page (MYFILE) which consists of the following.... <div> <input type="hidden" name="__EVENTTARGET" id="__EVENTTARGET" value="" /> <input type="hidden"... (2 Replies)
Discussion started by: noobie74645
2 Replies

7. Shell Programming and Scripting

Regular expression to extract ipv6 address

Hi all , I have a string in my weblog xheader v6-day-2011:xx:yy:zz:qq:qq:ww:ee:rr My requirement is to lookup the sting v6-day-2011 in this header and if found would like to extract the V6 ip part . v6-day-2011 is always constant for a ipv6 entry so i would like to extract every thing... (4 Replies)
Discussion started by: jambesh
4 Replies

8. Shell Programming and Scripting

Regular Expression for line

Hi, I'm trying to extract if the (offset>0 || flags ) from the following line: 90.30.180.90.80 > 90.121.333.308.45133: Flags , seq 14480:15928, ack 1, win 8088, options > 15:59:11.156664 IP (tos 0x0, ttl 20, id 44442, offset 0, flags , proto TCP (6), length 1500) try: offset.(+) ||... (7 Replies)
Discussion started by: ENG_MOHD
7 Replies

9. Programming

Perl: How to read from a file, do regular expression and then replace the found regular expression

Hi all, How am I read a file, find the match regular expression and overwrite to the same files. open DESTINATION_FILE, "<tmptravl.dat" or die "tmptravl.dat"; open NEW_DESTINATION_FILE, ">new_tmptravl.dat" or die "new_tmptravl.dat"; while (<DESTINATION_FILE>) { # print... (1 Reply)
Discussion started by: jessy83
1 Replies

10. Shell Programming and Scripting

regular expression with shell script to extract data out of a text file

hi i am trying to extract some specific data out of a text file using regular expressions with shell script that is using a multiline grep .. and the tool i am using is pcregrep so that i can get compatibility with perl's regular expressions for a sample data like this, i am trying to grab... (6 Replies)
Discussion started by: vemkiran
6 Replies
Bio::SeqIO::qual(3pm)					User Contributed Perl Documentation				     Bio::SeqIO::qual(3pm)

NAME
Bio::SeqIO::qual - .qual file input/output stream SYNOPSIS
Do not use this module directly. Use it via the Bio::SeqIO class (see Bio::SeqIO for details). my $in_qual = Bio::SeqIO->new(-file => $qualfile, -format => 'qual', -width => $width, -verbose => $verbose); DESCRIPTION
This object can transform .qual (similar to fasta) objects to and from Bio::Seq::Quality objects. See Bio::Seq::Quality for details. Like the fasta module, it can take an argument '-width' to change the number of values per line (defaults to 50). 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 one of the Bioperl mailing lists. 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 the bugs and their resolution. Bug reports can be submitted via the web: https://redmine.open-bio.org/projects/bioperl/ AUTHOR Chad Matsalla Chad Matsalla bioinformatics@dieselwurks.com CONTRIBUTORS
Jason Stajich, jason@bioperl.org APPENDIX
The rest of the documentation details each of the object methods. Internal methods are usually preceded with a _ next_seq() Title : next_seq() Usage : $scf = $stream->next_seq() Function: returns the next scf sequence in the stream Returns : Bio::Seq::PrimaryQual object Notes : Get the next quality sequence from the stream. _next_qual Title : _next_qual Usage : $seq = $stream->_next_qual() (but do not do that. Use $stream->next_seq() instead) Function: returns the next quality in the stream Returns : Bio::Seq::PrimaryQual object Args : NONE Notes : An internal method. Gets the next quality in the stream. next_primary_qual() Title : next_primary_qual() Usage : $seq = $stream->next_primary_qual() Function: returns the next sequence in the stream Returns : Bio::PrimaryQual object Args : NONE width Title : width Usage : $obj->width($newval) Function: Get/Set the number of values per line for FASTA-like output Returns : value of width Args : newvalue (optional) write_seq Title : write_seq Usage : $obj->write_seq( -source => $source, -header => "some information" -oneline => 0); Function: Write out a list of quality values to a fasta-style file. Returns : Nothing. Args : Requires a reference to a Bio::Seq::Quality object or a PrimaryQual object as the -source. Option 1: information for the header. Option 2: whether the quality score should be on a single line or not Notes : If no -header is provided, $obj->id() will be used where $obj is a reference to either a Quality object or a PrimaryQual object. If $source->id() fails, "unknown" will be the header. If the Quality object has $source->length() of "DIFFERENT" (read the pod, luke), write_seq will use the length of the PrimaryQual object within the Quality object. perl v5.14.2 2012-03-02 Bio::SeqIO::qual(3pm)
All times are GMT -4. The time now is 06:16 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy