Help for this page

Select Code to Download


  1. or download this
     
    $ENV{"VER"} = "3.0";
    
  2. or download this
     
    my $ver_dir = "/opt/SAT/" . $ENV{"VER"};
    
  3. or download this
     
    my $ver_dir =  set_ver_dir();
    
  4. or download this
    sub set_ver_dir {
     my $path = $FindBin::Bin;
    ...
     my $ver = $1;
     return "/opt/SAT" . $ver 
    }