我尝试使用此代码打印基因名称的标题,然后根据其位置提取子字符串,但这不起作用
$VAR1 = {
'monkey' => [
[
'monkey','ACB2',70,'230'
],[
'monkey','GMSD',234,'GJAS',521,'ASDA',134,'ASMD',700,'230'
]
],'bear' => [
[
'bear',12,'87'
],[
'bear','GASF',131,'SDVS',53,'87'
]
],'snake' => [
[
'snake','120'
],[
'snake','SGJK',183,'KDMFS',1213,'VCS2',21,'120'
]
]
};
input_file
>output_file
cat input_file | while read row; do
echo $row > temp
geneName=`awk '{print $1}' tmp`
startPos=`awk '{print $2}' tmp`
endPOs=`awk '{print $3}' tmp`
for i in temp; do
echo ">${geneName}" >> genes_fasta ;
echo "awk '{val=substr($0,${startPos},${endPOs});print val}' fasta" >> genes_fasta
done
done
fasta
nad5_exon1 250405 250551
nad5_exon2 251490 251884
nad5_exon3 195620 195641
nad5_exon4 154254 155469
nad5_exon5 156319 156548
这是我的错误输出文件
atgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgcatgc............
输出应如下所示:
>
awk '{val=substr(pull_genes.sh,);print val}' unwraped_carm_mt.fasta
>
awk '{val=substr(pull_genes.sh,);print val}' unwraped_carm_mt.fasta