codepad
[
create a new paste
]
login
|
about
Language:
C
C++
D
Haskell
Lua
OCaml
PHP
Perl
Plain Text
Python
Ruby
Scheme
Tcl
$seq = "GAGtatCTGGAAGACAGGCAGACTTTTCGCCACAGCGTGGTGGTACCTTATGAGCCACCCGAGGCCGGCT"; # Per fare il ciclo devo sapere quanto lunga รจ la stringa $lunghSeq = length($seq); # Adesso faccio un ciclo con una variabile "posizione" # che faccio aumentare di tre (anziche il consueto +1) for ($pos = 0; $pos < $lunghSeq; $pos+=3) { $codone = substr($seq, $pos, 3); if (length($codone) == 3) { print "$codone "; } else { print "X"; } }
Private
[
?
]
Run code
Submit