perl代码，perl编程题

求一个perl程序进行二维矩阵转置

//其他系统请删除 pragma warning(disable：4996)//VS 主函数签名格式。

双重循环即可 int n=..，m=...，i，j；double a[n][m]={...}；double b[m][n]；for (i=0；in；i++){ for (j=0；jm；j++) b[j][i] = a[i][j]；} 互换后的在b中。

a×a的转置等于AA^T| = |A| |A^T| = |A||A| = |A|^2即矩阵A乘以A的转置等于A的行列式的平方。|A|=|A|。转置矩阵的行列式等于原矩阵的行列式。而乘积矩阵的行列式等于行列式的乘积。|AA|=|A||A|。

perl中读取文件的问题

为待读取的文件或者准备写入的新文件名，一般配合 ARGV 从参数中读取。

问题提问的不很明确。关于常用的文件头，文件尾的操作如下：跳到文件头。

尽量修改为open (THIRD，C：\\zip)；否则是追加，而不是重写。因此如果C：\\zip文件已经存在，那么你再追加就可能存在问题。

= $#users+1；print $key，$usercount，$times\n；}注意：读取文件头到$head变量的那句已经注释掉了。

用perl写一个程序,类似于cat,但保持输出的顺序关系.

a.fa 你所需要的ID列表所在文件为ID.txt 那么在命令行输入perl run.pl ID.txt a.fa 回车即可 结果将在屏幕打印出来。

正好我也在做bioinformatics这块儿，学了点bioperl，我帮你写了个小脚本，用这个工具能很快捷的搞定你的序列！我大致给你说下，具体自己上bioperl网站看How To。

一定要使用 cat logdata | 我的program.pl 这种方式吗？如果在perl脚本里打开文件会简单的多。

我们来分析一下这段程序。第3行重定向标准输出Perl文件，方法是打开Perl文件file1将它与Perl文件变量STDOUT关联，这也关闭了标准输出Perl文件。

perl有个system命令用来调用shell，可以在这个函数里面执行命令行语句。

输入 perl test.pl 然后就能执行了。其中test.pl是你所要运行的文件的名称用命令指示符则说不是内部或外部的命令。这个说明安装没有自动把perl的文件路径自动添加到环境变量中去。

perl编写Genesis脚本的问题

你知道在个genesis中有特殊指令，可以屏蔽错误报告。不管这个step 是否存在，你直接去新建这个step就好了如果存在他不会报错。cshell 中如下：VOF COM 。。

你可以改一下Genesis.pm文件，在INFO这个方法里不要删除$csh_file并且把$csh_file return出来 打开句柄读行 没在windows下弄过，不了解。

第一行是指你的perl主程序位置，一般windows里的默认安装是c：/Perl/bin/perl.exe 你第一行就有两个错误，程序位置错了，少了一个分号“；”。第二行不知道你是什么意思，觉得是多余的东西。

把 e：/genesis/e92/all换成$GENESIS_EDIR/all试一下，可能是gui路径不正确。

...06H,09H,0AH,0CH,11H,12H,14H。用汇编语言编程序将0-9数字转换成...

1、将（0~9)分别转化为大写的英文字符A~J。对应关系是0转换为A；1转换为B；2转换为C；...依次类推 ；。主程序的功能是接收键盘输入的字符。

2、自然二进制码转换成二进制格雷码 自然二进制码转换成二进制格雷码，其法则是保留自然二进制码的最高位作为格雷码的最高位，而次高位格雷码为二进制码的高位与次高位相异或，而格雷码其余各位与次高位的求法相类似。

3、编两个通用过程完成将AX中存放的二进制数转换成压缩型BCD码以及将BCD码转换成二进制数。； 本程序通过编译，运行正确。

4、下面是我用STC89C52单片机编的程序，采用4*4矩阵键盘，键盘接P3口，采用六位数码管（共阴极）显示，数码管位选和片选信号分别通过两个锁存器接P0口，位选所存端接P^7口，段选所存端接P2^6口。