Select Code to Download

(
  success => 0,
  data    => q{whatever},
  message => q{something horrible happened},
)

my %result = validate($arg1, $arg2);
if ($result{success}){
...
 # try again
 send_screen_back($result{message});
}