perl可以做什么程序（用PERL做一个基本程序）
本文目录
用PERL做一个基本程序
这是对一个内存有行星早陆裤名称星座亮度等内容的文件进行的程序。
第一段是用来查询一些名称对应亮度的。第二段是统计同一星座星数的，可以比较容易改成调用子悉圆程序的。第三段是对文件后存入文件。不知道合不合要求
#!/usr/bin/perl -w
use strict;
open F, "star25.txt" or die "Can’t open file";
my @lines = 《F》;
close F;
chomp @lines;
s/#.*// foreach @lines;
my (%sname, %spectrum, @fields);
foreach (grep !/^$/, @lines) {
@fields = split /:/, $_;
next if @fields 《 6;
$sname{$fields;
$spectrum{$fields;
}
print exists $sname{$_} ?
"$_: Scientific name is $sname{$_}, Spectrum is $spectrum{$_}\n" :
"$_: Not find!\n"
foreach (’Pole star’, ’Castor’, ’Altair’, ’Hadar’);
###################
my $c;
foreach $c (’Ori’, ’Cen’, ’Cru’) {
print "Number of starts in $c is ",
scalar(grep {$_ eq $c} map ((split / /, $_), values %sname)),
"陆简\n";
}
###################
my %Nspec;
$Nspec{substr $_, 0, 1}++ foreach values %spectrum;
open F, "》OBAFGKM.txt" or die "Can’t open file for write.";
print F "$_:$Nspec{$_}\n" foreach keys %Nspec;
close F;
1;
Perl适合编写什么程序
Perl优势是字符串处理。曾经是CGI的默认语言，但他的缺点是相对他的应用来说过于强洞裂大……在高速的发展中写CGI显得杀鸡用牛刀，然后要更快的有PHP，要更安全的用可编译的写CGI……携斗所以似乎写CGI的不多了，纳隐闭除了我这些偏执狂……
不过Perl在有些方面还是保持着生命力。例如，他是Linux默认的编译器之一，还是有软件例如VMWare Linux版是Perl的；在一些系统管理上可以当做强大的脚本工具……至少比你写C来得方便。还有就是最牛B的应用：Perl的模块，例如BioPerl是生物信息学的必备工具，其地位如同MatLab在数学中的地位……
求一个用perl语言写的程序
这个用bioperl来做非常简单，但有一些模块需要你自己安装。这就需要你熟悉cpan上模块的安装。或者参见我空间里bioperl安装的内容。
这里直接用到的就是Bio::SeqIO
module,但它可能依赖于一些相关模块，所以最好装全bioperl。
装胡厅好之后就可庆指以用下面的script。
#!/usr/bin/perl
#
the
directory
of
you
perl
binary
file
use
strict;
use
warnings;
my
$in
=
Bio::SeqIO-》newFh(-file
=》
"inputfilename"
,
-format
=》
’swiss’);
my
$out
=
Bio::SeqIO-》newFh(-file
=》
"outputfilename",
-format
=》誉做配
’fasta’);
print
$out
$_
while
《$in》;
#
注意根据你的需要改变-file和-format的参数值。
#
good
luck
更多文章：
2025年11月7日 13:45
2026年2月20日 18:00
如何用纯CSS实现接扎啤的特效（附源码）？如何使用纯CSS实现从按钮两侧滑入装饰元素的悬停特效（附源码）
2026年7月16日 02:15
adodb连接oracle数据库的server属性（如何用adodc和datagird连接数据库）
2025年11月10日 18:00
2026年7月14日 15:45
2026年4月7日 08:30
2025年6月12日 10:30
2026年7月13日 09:00
2026年1月18日 00:00
hadoop集群搭建公平（VMware搭建完全分布式Hadoop集群）
2025年10月3日 16:15
2026年3月10日 03:45
2026年7月22日 19:45
设计公司网站源码（别人给我们公司建的网站，我们没有源代码能自己设计吗）
2026年8月9日 01:15
汇编语言延时程序怎么写（用8086汇编语言，编写延时子程序）
2025年6月20日 23:30
ai基础教程入门视频（哪里有一些比较全面的ai教程，视频的，一定要全面）
2026年9月18日 22:30
网站在线客服系统怎么申请（企业自己做网站，怎么添加’在线客服系统呢）
2026年9月6日 22:15
2025年7月18日 14:00
equivalent英文（请问:等于，不等于，大于，小于，大于等于，小于等于的英文English是什么）
2025年10月21日 16:15
myeclipse注册码在哪里输入（myeclipse10，需要注册码怎么办）
2025年9月20日 12:30
2025年7月5日 17:30
