文件读取实验.ppt.pptVIP

* Perl实验 结合数组和文件读取 大小写转换 $str = lc($str);$str = uc($str); * 1：文件的读写 open CONFIG, “filename”; open CONFIG, “filename”; open BEDROCK, “filename”; open LOG,“filename”; 当Perl 内部发生了一个严重错误(fatal error)，无法打开文件，可以利用die函数来返回发生错误的信息. * 例如：读取路径F:\教学课程\Per语言\perl理论\lesson4文件夹下的chr1.fa文件可以用语句： open IN,“ F:\\教学课程\\Per语言\\perl理论\\lesson4 \\chr1.fa or die cant open the data$!\n; open IN,“ F:\\教学课程\\Per语言\\perl理论\\lesson4 \\chr1.fa or die cant open the data$!\n; * 打开文件句柄以后，读取文件是应用钻石符号加上文件句柄，例如IN，一个IN代表文件的一行。 实验题目：读取ch1.fa文件的前10行，用print打印出来。(尝试用while循环，for循环，foreach循环分别实现程序)提示：perl中跳出循环是用last，和