← Back to branch summary

~ubuntu-branches/ubuntu/trusty/bwa/trusty

« back to all changes in this revision

Viewing changes to sracsfq2fq.pl

  • Committer: Bazaar Package Importer
  • Author(s): Charles Plessy
  • Date: 2011-02-08 16:11:12 UTC
  • mfrom: (1.1.7 upstream)
  • Revision ID: james.westby@ubuntu.com-20110208161112-1fvt0mtygl8rhajf
Tags: 0.5.9-1
* New usptream release
  - Upstream moved to GitHub (debian/upstream-metadata.yaml).
  - Checked copyright; one file was removed (debian/copyright).
* Migrated the Debian source package to Git (debian/control).
* Use Debhelper 8 (debian/control, debian/compat).

Show diffs side-by-side

added added

removed removed

Lines of Context:
sracsfq2fq.pl
1
 
#!/usr/bin/perl -w
2
 
 
3
 
use strict;
4
 
use warnings;
5
 
 
6
 
die("Usage: sracsfq2fq.pl <in.sra.fasta>\n") if (@ARGV == 0 && -t STDIN);
7
 
while (<>) {
8
 
  print;
9
 
  $_ = <>; $_ = substr($_, 2);
10
 
  tr/0123./ACGTN/;
11
 
  print;
12
 
  $_ = <>; print $_;
13
 
  $_ = <>; print substr($_, 2);
14
 
}