Perl is case-sensitive, so everywhere that you've capitalized a command,
you've got a statement that won't work. So to cite some examples:
On Tue, 9 Nov 2004, Li, Aiguo (NIH/NCI) wrote:
> Use strict;
> Use warning;
>
> My @split;
> My @replicate = ( 4, 3);
> My @ratio;
> My $p=0, $m=0, $a=0, $rep=0, $i;
>
> Open (IN, "C:\replicate.txt") or die "can not open file\n";
>
> While (<IN>) {
The above needs to be
use strict;
use warnings;
my @split;
my @replicate = ( 4, 3);
my @ratio;
my $p=0, $m=0, $a=0, $rep=0, $i;
open (IN, "C:\replicate.txt") or die "can not open file\n";
while (<IN>) {
Also, it's "use warnings;" with an S at the end.
This code won't do anything until those corrections are made.
--
Chris Devers
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
