- or download this
#!/usr/bin/perl -w
# Counting 3-letter words in a string
$a="NTCA TCC TCGTCTTTCTTTTTATTGTACTATTAATAGTGCTGTTGATGGCTACTCCTGCTTCCA
+CAT
...
GCT=$GCT; GAC=$GAC; GAT=$GAT; GAA=$GAA; GAG=$GAG;\n
GGA=$GGA; GGC=$GGC; GGG=$GGG; GGT=$GGT.\n";
exit;
- or download this
Results obtained (wrong):
Microsoft Windows [Version 6.1.7600]
...
GCT=4; GAC=4; GAT=2; GAA=2; GAG=3;
GGA=1; GGC=5; GGG=2; GGT=2.
- or download this
Correct Results should be like this:
No. of single letters:
...
GCT=1; GAC=1; GAT=1; GAA=1; GAG=1;
GGA=1; GGC=1; GGG=1; GGT=1.