use warnings;
use strict;

use Module::Load;

if(! $ENV{SPRING_WRITEDIR}) {
  $ENV{SPRING_WRITEDIR}='E:\\test';
  system {$^X} ($^X,$0);
  exit;
}