一个简单的Perl脚本求单条序列的GC含量

#!/usr/bin/perl
use strict;
use warnings;
##初学Perl，代码比较简单，其实还有更简单的解决办法，请勿拍砖
my $str = "ACGTACGTACGT";
##$str为目标序列，即计算该序列的GC%
my @lines = split //,$str;
##将目标序列分割成单个碱基，并将单个碱基存入数组
my($num_A,$num_G,$num_C,$num_T) = (0,0,0,0);
初始化各种碱基的值，起始值为0
foreach my $char (@lines) {if ($char eq 'A') {$num_A++;}if ($char eq 'C') {$num_C++;}if ($char eq 'G') {$num_G++;}if ($char eq 'T') {$num_T++;}
}
##遍历数组，分析并计算各种碱基的个数；
my $GC_num = $num_G + $num_C;
#定义GC含量；
my $GC_content = $GC_num/@lines;
#计算GC含量
#my $len = length($str);
print "$GC_content\n";

一个简单的Perl脚本求单条序列的GC含量相关推荐

编写一个最简单的.php,学习猿地- 说明如果我们要编写一个简单的PHP脚本，需要学习哪些...
说明如果我们要编写一个简单的 PHP 脚本,需要学习哪些基础知识呢? PHP 基础 PHP 脚本可放置于文档中的任何位置. 标准的 PHP 脚本以 <?php 开头,以 ?> 结尾: ...
linux系统写一个脚本,编写一个简单的linuxshell脚本
shell脚本和windows平台上的bat批处理是一样的,简化用户处理重复动作的操作,shell脚本由shell命令组成.下面是学习啦小编收集整理的编写一个简单的linuxshell脚本,希望对大家 ...
一个简单的MATLAB脚本——快速行进算法（FMM））
一个简单的MATLAB脚本--快速行进算法(FMM) 介绍快速行进算法(FMM)的简单MATLAB脚本,不到20行代码实现快速行进算法的运算结果,而且计算速度非常快.给了两个实例模型来说明计算结果. ...
一个简单的SHELL脚本模板
一个简单的SHELL脚本模板,适用于Java项目的启动,停止,重启. 如果在windows上编辑,请使用Notepad++ 设置编码格式为UTF-8无BOM编码,脚本的文档格式为UNIX格式,否则会因 ...
一个简单的Python脚本实现SOCKS5代理服务器的基本功能
以下是一个简单的Python脚本,实现了SOCKS5代理服务器的基本功能: import socket import selectclass Socks5Proxy:def __init__(self ...
python构建一个简单的备份脚本
编写思路: 1.建立一个空的列表,把需要备份的数据写入到列表,方便后面调用. 2.建立备份存放的目录. 3.调用os模块从列表里面读取数据,然后调用tar 命令进行备份. #!/usr/bin/pyt ...
C语言游戏脚本：一个简单的内存脚本！
通过 C 语言编写一个简单的外挂,通过 API 函数修改游戏数据,从而实现作弊功能 ● 对象分析 ● 要用的 API 函数简单介绍 ● 编写测试效果 ● 总体评价对象分析本次游戏对象为 Super ...
python怎么写游戏脚本_用PYTHON做一个简单的游戏脚本（基础，详细）
引言这段时间迷上了玩点点点的小游戏,但是某些重复的环节着实无聊,就想着能不能用PYTHON做一个游戏脚本,不过为了熟悉需要做脚本的各个模块,于是打算在4399上找一个比较像的游戏做个脚本练练手,后来 ...
用PYTHON做一个简单的游戏脚本（基础，详细）
引言这段时间迷上了玩点点点的小游戏,但是某些重复的环节着实无聊,就想着能不能用PYTHON做一个游戏脚本,不过为了熟悉需要做脚本的各个模块,于是打算在4399上找一个比较像的游戏做个脚本练练手,后来 ...
linux spt 脚本,写一个简单的FGO脚本
前言正好最近事情比较少,就抓紧时间简单写了一个FGO脚本(API),当初的想法相当简单,就是想写一个abstract的FGO的API来实现对FGO的操作,同时还可以当脚本来用. 思路因为是关于FG ...

一个简单的Perl脚本求单条序列的GC含量

一个简单的Perl脚本求单条序列的GC含量相关推荐

最新文章

热门文章