Select Code to Download

{
...
  }
}

   (...)
   my $data = decode_json($json);
   my $Catalina_Base = $data->{'local'}->{'tomcat'}->{'instances'}->{'
+instance_name'}->{'catalina_base'};
   (...)

   (...)
   my $data = decode_json($json);
   my $Instance_Name = $data->{'local'}->{'tomcat'}->{'instances'}->{'
+instance_name'};
   (...)