anchor.diff:  :: ========================================================================
   
   doskey alias=if "$1" == "" ( doskey /macros ) else ( doskey $* )
  +doskey unalias=doskey $1=
   doskey cmd.env="%~f0"
   doskey cmd.banner="%~dp0cmd.banner.bat"
   
  
positive.code: ::
  :: ========================================================================
  
  for /d %%d in ( "%TEA_HOME%\opt\*" ) do call :cmd.env.select.set.path "%%~d"
  
  :: ========================================================================
  ::
  
negative.code: 
  :: set "PERL_HOME=%TEA_HOME%\vendors\strawberryPerl-5.8.8.3"
  set "PERL_HOME=%TEA_HOME%\vendors\StrawberryPerl-5.16.2"
  for %%f in ( 
  	"c" 
  	"perl" 
  	"perl\site" 
  ) do call :cmd.env.select.path "%PERL_HOME%\%%~f" /P
  
  :: ========================================================================
  ::
  