Help for this page

Select Code to Download

Select or download this

#!usr/bin/perl-w
my $seq="ATCATCATCATC";
my (%first,%second,%third);
...
}
print "\n\n";# Line 30 
exit;

Select or download this

C:\Users\xyz\Desktop>chak.pl
     
 Letters At 1st & 2nd Positions:
...
  AT=0;  Letters At 1st & 3rd Positions:
  TC=0;  Letters At 1st & 3rd Positions:
  AC=0;(It is wrong; should be AC=4)