# this works as a bash include
#
#COMM SeqLab::SeqStreamIn, SeqLab::SeqFormat, SeqHandle.pl
#COMM - esp. non-seekable input handle in determination of input format mediated
#COMM   by FileHandle::Unget

# give include precedence to code directory, perl -I would not work!
PERLPATH_SV="$PERLPATH"
export PERLPATH="$dircode"

cat "$dirtest"/test_seq_ntmult.fa  \
  | perl "$dircode"/SeqHandle.pl -ListID -
cat "$dirtest"/test_seq_ntmult.fa  \
  | perl "$dircode"/SeqHandle.pl -ListLen -

export PERLPATH="$PERLPATH_SV"
