anchor.diff:  ::
   :: ========================================================================
   
  -if exist "%ProgramFiles%\Oracle\VirtualBox" set "PATH=%PATH%;%ProgramFiles%\Oracle\VirtualBox"
  +call :cmd.env.select.path "%ProgramFiles%\Oracle\VirtualBox"
   
   :: ========================================================================
   ::
  
positive.code: :: ========================================================================
  
  doskey alias=if "$1" == "" ( doskey /macros ) else ( doskey $* )
  doskey cmd.env="%~f0"
  doskey cmd.banner="%~dp0cmd.banner.bat"
  
  
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
  
  :: ========================================================================
  ::
  