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: 
  :: set "PERL_HOME=%TEA_HOME%\vendors\strawberryPerl-5.8.8.3"
  set "PERL_HOME=%TEA_HOME%\vendors\StrawberryPerl-5.16.2"
  
  :: if defined PERL_HOME set "PATH=%PATH%;%PERL_HOME%\perl\site\bin;%PERL_HOME%\perl\bin;%PERL_HOME%\c\bin"
  if defined PERL_HOME set "PATH=%PERL_HOME%\perl\site\bin;%PERL_HOME%\perl\bin;%PERL_HOME%\c\bin;%PATH%"
  
  :: ========================================================================
  ::
  
negative.code: 
  :: ========================================================================
  ::
  :: Tea-Set
  ::
  :: ========================================================================
  
  for /f "tokens=*" %%p in ( "%~dp0." ) do call :cmd.env.set.home TEA_HOME "%%~fp"
  
  :: ========================================================================
  ::
  