Help for this page

Select Code to Download


  1. or download this
      # In myscript.cgi, or your mod_perl configuration, or wherever:
  
...
  load_plugins();
  print_output( "<html>Here's my CGI script output.</html>" );
  2. or download this
      # In $plugins_dir/uppercase.pm:
  
  sub print_output {
    print map { uc } @_;
  }
  3. or download this
      # In $plugins_dir/uppercase.pm:
  
...
  sub print_output {
    &$inner_print_output( map { uc } @_ );
  }
  4. or download this
      # In $plugins_dir/remove_whitespace.pm:
  
...
  sub print_output {
    &$inner_print_output( map { s/\s//g } @_ );
  }