basileus_82
25-12-2011, 16:30
ciao a tutti
per gestire le eccezioni uso eval
vorrei che quando viene catturata l'eccezione, non venisse stampato nulla, ma solo si vedesse la messagebox
ora come ora mi da entrambi
ho provato anche die "$!" al posto di return ma nulla
il pezzo di codice di interesse è qui sotto
---
eval { local $@; $workbook = $template->SaveAs($out); 1 }
or do {$mw -> messageBox(-icon =>'warning',-message=>"File aperto, chiudilo e ritenta",-type=>'ok'); return ; };
---
per gestire le eccezioni uso eval
vorrei che quando viene catturata l'eccezione, non venisse stampato nulla, ma solo si vedesse la messagebox
ora come ora mi da entrambi
ho provato anche die "$!" al posto di return ma nulla
il pezzo di codice di interesse è qui sotto
---
eval { local $@; $workbook = $template->SaveAs($out); 1 }
or do {$mw -> messageBox(-icon =>'warning',-message=>"File aperto, chiudilo e ritenta",-type=>'ok'); return ; };
---