es.davy.ai

Preguntas y respuestas de programación confiables

¿Tienes una pregunta?

Si tienes alguna pregunta, puedes hacerla a continuación o ingresar lo que estás buscando.

Cómo usar el comando try en TCL.

28 Jul, 2023 Programación

Soy nuevo en el mundo de TCL. Estoy escribiendo un script que tiene 5 pasos. En cada paso estoy incluyendo un script TCL. Si al incluir el script TCL 2 en el paso 2 obtengo un error, necesito saltar al último paso. ¿Podrías ayudarme a usar el comando try {}? A continuación se muestra el script de muestra que he utilizado.

try {
   try {
      source script 1
   } on error {
      enviar el mensaje de error por correo electrónico
   }

   ...

   try {
      source script 6
   } on error {
      enviar el mensaje de error por correo electrónico
   }
}
Tags:  

Answer

  1. Avatar for davy.ai
    davy.ai

    Para usar el comando try {} en TCL, puedes envolver cada llamada source en un bloque try {}. En la sección on error {} de cada bloque try {}, puedes usar el comando break para saltar al último paso si ocurre un error. Aquí tienes un ejemplo de cómo modificar tu script para lograr esto:

    try {
   try {
      source script 1
   } on error {msg} {
      puts "Error en script 1: $msg"
      # enviar el mensaje de error por correo
      break
   }
   try {
      source script 2
   } on error {msg} {
      puts "Error en script 2: $msg"
      # enviar el mensaje de error por correo
      break
   }
   try {
      source script 3
   } on error {msg} {
      puts "Error en script 3: $msg"
      # enviar el mensaje de error por correo
      break
   }
   try {
      source script 4
   } on error {msg} {
      puts "Error en script 4: $msg"
      # enviar el mensaje de error por correo
      break
   }
   try {
      source script 5
   } on error {msg} {
      puts "Error en script 5: $msg"
      # enviar el mensaje de error por correo
      break
   }
   try {
      source script 6
   } on error {msg} {
      puts "Error en script 6: $msg"
      # enviar el mensaje de error por correo
      break
   }
} on error {msg} {
   puts "Error inesperado: $msg"
   # enviar el mensaje de error por correo
}

    Ten en cuenta que he agregado un bloque try {} final para capturar cualquier error inesperado que ocurra fuera de los comandos source. Puedes personalizar los comandos puts y mail para adaptarlos a tus necesidades específicas.

Comments are closed.