Help for this page
$ perl -le ' > $str = q{YYSFTVMETDPVN[115]HMVGVISVEGRPGLFWFN[115]ISGGDKN[115]}; ... 30 37 $
$ perl -Mstrict -wle ' > print for findPosns( ... 30 37 $