my $ws_name = $ENV{COMPUTERNAME};