Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl -w
    
    ...
    }
    
  2. or download this
    #!/usr/bin/perl -w
    
    ...
    close FIFO;
    
  3. or download this
    my %IniStruct = (
            qr/^MONICACTE RAIZ$/ => {
    ...
       }
    }
    
  4. or download this
    <HTML>
       <HEAD>
    ...
          <FRAME SRC="qry_empty.html" NAME=FRM_QRY NORESIZE>
       </FRAME>
    </HTML>
    
  5. or download this
    use strict;
    use CGI ':standard';
    ...
    print "Content-type: text/html\n\n";
    
    print $template->output;
    
  6. or download this
    use IO::Socket;
    
    ...
    }
    
    close $client
    
  7. or download this
    use Tk;
    use Tk::HList;
    ...
         }
      }
    }
    
  8. or download this
    
    my @resultados = `rsh worst-station -l ab-user ls -lta /space`;
    ...
    
    close LOG;