- or download this
#!/usr/bin/perl
use warnings;
$pro="ABCDEFGH";
...
# To get the last tetra:
$last=join('',@pro); print"\n $last\n"; # Line 15
exit;
- or download this
Microsoft Windows [Version 6.1.7600]
C:\Users\x>cd desktop
C:\Users\x\Desktop>try.pl
...
DEFG ->Starting at pos 2
EFGH
- or download this
Tetra words are:
ABCD ->Starting at pos 1
...
DEFG ->Starting at pos 4
EFGH ->Starting at pos 5