请教关于perl的问题

#!/usr/bin/perl -w
# Reading protein sequence data from a file, take 4
# The filename of the file containing the protein sequence data
$proteinfilename = 'NM_021964fragment.pep';
# First we have to "open" the file, and in case the
# open fails, print an error message and exit the program.
unless ( open(PROTEINFILE, $proteinfilename) ) {
print "Could not open file $proteinfilename!\n";
exit;
}
# Read the protein sequence data from the file in a "while" loop,
# printing each line as it is read.
while( $protein = <PROTEINFILE> ) {
print " ###### Here is the next line of the file:\n";
print $protein;
}
# Close the file.
close PROTEINFILE;
exit;

以上是我在beginning perl for bioinformatics这本书中看到的一个例子，但是当我执行程序时，结果是could not open file NM_021964fragment.pep, 我事先在c盘下新建了这个文件，里面是蛋白质序列数据。
为什么我不能读取该文件中的数据，这可是书中的程序？ 希望各位大侠指点一下。谢谢。

路径对吗？

应该是路径不对把。

print "Could not open file $proteinfilename!\n----$!";就可以看到详细错误了

请教一下怎么来表示路径，我的书上可没有说要表明蛋白质序列文件的路径？谢谢大家

$proteinfilename = 'c:/你创建的文件夹名/NM_021964fragment.pep';

请问为什么我写了$proteinfilename='c:/protein/NM_021964fragment.pep';这路径了，而且路径也是对的，怎么还是could not open file，谢谢

'c://protein//NM_021964fragment.pep' or 'c:\protein\NM_021964fragment.pep'

上面这位大侠，您的那种路径写法我试了，可是还是结果could not open file.

写反了

如果放在和程序同目录下，就不用写路径。
如果要写，那么注意要使用“/”而不是“\”，要和windows本身的路径表示方法不一样的。
或者使用“\\”也可以。