azalea用Python漂亮地打印序列：http://i.azpala.com/2010/07/15/print-sequence-beatifully-using-python/
我也用perl玩玩，不怎么漂亮的打印序列。
代码写得不咋得。
#!/usr/bin/perl $seq = 'ATGGAGCCTAATGATAGTACCAGTACCGCTGTGGAGGAGCCTGACAGCTTGGAGGTGTTGGTGAAGACCTTGGACTCTCAAACTCGTACCTTTATTGTGGGGGCCCAGATGAATGTAAAAGAGTTTAAGGAGCACATTGCTGCCTCTGTCAGCATCCCAT'; $step = 10; $group = 5; $count = 0; for ($i=0; $i*$step<length($seq); $i++) { $count++; print substr($seq, $i*$step, $step); if ($count == $group){ print "\n"; $count = 0; }else{ print " "; } }
结果：
atggagccta atgatagtac cagtaccgct gtggaggagc ctgacagctt ggaggtgttg gtgaagacct tggactctca aactcgtacc tttattgtgg gggcccagat gaatgtaaaa gagtttaagg agcacattgc tgcctctgtc
用php也神奇地相似。把perl的length函数换为php的strlen函数就得了。
<?php
$seq = 'ATGGAGCCTAATGATAGTACCAGTACCGCTGTGGAGGAGCCTGACAGCTTGGAGGTGTTGGTGAAGACCTTGGACTCTCAAACTCGTACCTTTATTGTGGGGGCCCAGATGAATGTAAAAGAGTTTAAGGAGCACATTGCTGCCTCTGTCAGCATCCCAT';
$step = 10;
$group = 5;
$count = 0;
for ($i=0; $i*$step<strlen($seq); $i++) {
$count++;
print substr($seq, $i*$step, $step);
if ($count == $group){
print "\n";
$count = 0;
}else{
print " ";
}
}
?>
~完
有点相关的文章
- 如何用perl处理测序文件 (1.000)
- perl常用的内置特殊变量 (1.000)
- perl:使用system函数 (1.000)
- 用Perl下载NCBI的Blast库（Blastdb） (1.000)
- 用Perl创建UTF-8的文件 (1.000)
- Perl chdir函数 (RANDOM - 1.000)
虽然没看懂 不过还是要支持
[回复]
留成是搞 程序开发的啊？？？？
[回复]
感觉挺像我们C语言老师讲的例题![[偷笑]](http://liucheng.name/wp-includes/images/smilies/icon_tx.gif)
[回复]
[回复]
太深奥了,呵呵 还是很支持的
[回复]
感觉perl和PHP，有点像。
[回复]
看不明白，呵呵
[回复]
看不懂。。。唉。。。
[回复]
如此复杂，循环循环。。。
![[晕]](http://liucheng.name/wp-includes/images/smilies/icon_yun.gif)
[回复]
这是什么？![[衰]](http://liucheng.name/wp-includes/images/smilies/icon_shuai.gif)
[回复]
不搞编程
[回复]
不断的发现
[回复]
不懂这些东西。
[回复]
纯支持
[回复]
不懂
不懂
dingding
[回复]
干嘛的？
[回复]
好东西
[回复]
呵呵。支持，虽然不懂
[回复]
呵呵~什么东东
[回复]
看不懂+路过 ~![[疑问]](http://liucheng.name/wp-includes/images/smilies/icon_yiw.gif)
[回复]
php高手都看不懂。。不会吧~
[回复]
咦？原来和PHP差不多的，嘎嘎，前面看到一句perl就被吓跑了 ~
[回复]
不错啊！和PHP很相识！
[回复]
博盟今日调查：新的备案系统下,你是否会选择国外主机？
[回复]
呵呵，能不能打印啊，试试怎么样![[偷笑]](http://liucheng.name/wp-includes/images/smilies/icon_tx.gif)
[回复]
看不懂
[回复]
完全彻底搞不懂！
[回复]
今天没新内容更新哦~~
[回复]
不懂 做下雷锋~~
[回复]
我也做雷锋~~
[回复]
不是很懂
[回复]
比较专业性的啊。。。
[回复]
恩 学习 了
不错
[回复]
博主 你好厉害，感觉你什么都懂哦！![[可爱]](http://liucheng.name/wp-includes/images/smilies/icon_ka.gif)
[回复]
汗。其实都不咋的。![[擦汗]](http://liucheng.name/wp-includes/images/smilies/icon_ch.gif)
[回复]
有意思，给你顶了！呵呵，收藏
[回复]
啥啊，没怎么看懂额
[回复]
怎么黄君大哥收到礼物了已经 貌似是自己去选的啊 我还在这等着你送呢 哇咔咔 我理解错了？ 我的礼物啊 ！![[流泪]](http://liucheng.name/wp-includes/images/smilies/icon_ll.gif)
[回复]
[回复]
这个看不懂。。
[回复]
看得懂几个函数，哈哈
[回复]
完全看不懂是什么意思?
[回复]
我也看不懂，不过上面的这些评论人的昵称着实让我很惊讶
[回复]
看不懂啊。。 看不懂。。
[回复]
好东西，谢谢
[回复]
不知道有什么用处
[回复]
都是代码啊
[回复]
看不懂。。。。
[回复]
代码确实不懂
[回复]
不错郑州seo(http://www.unseo.net)来学习了
[回复]
不错 学习，
[回复]
不错了。
[回复]
代码好复杂。
[回复]
看不懂。头晕了
[回复]
俺也看不懂。。。
[回复]
来支持一下了！
[回复]
感觉有点高深
[回复]
看不懂啊
[回复]
很好。。。支持
本文详细出处参考：http://liucheng.name/1810/
[回复]
之前做一个实验的时候网页生成word文档，图片就是要用绝对路径的。。也是学了好久好久
[回复]
这个没大看懂,学习了!
[回复]