Help for this page

Select Code to Download


  1. or download this
      my $widget = undef;
      while( <> ) {
    ...
        }
      }
      if( defined $widget ) { ... }
    
  2. or download this
      Notify ($key, $script, @errors, @message);
    
  3. or download this
      my $key = shift @_;
      my $script = shift @_;
      my $errors = "@_";