my $widget = undef;
  while( <> ) {
    if( useable($_) ) {
       $widget = $_;
       last;
    }
  }
  if( defined $widget ) { ... }

##</code><code>##

  Notify ($key, $script, @errors, @message);

##</code><code>##

  my $key = shift @_;
  my $script = shift @_;
  my $errors = "@_";