Code-source php


        <?php
        
         ########################################
        
         function listeFonctions($fichier) {
        
         ########################################
        
         if (!file_exists($fichier)) {
           print " Désolé, je ne vois pas le fichier $fichier\n" ;
           exit(-1) ;
         } ; # fin de si
        
         echo "\n Liste des fonctions du fichier : $fichier\n\n" ;
        
         $fh = fopen($fichier,"r") ;
         $nbl = 0 ;
        
         while (!feof ($fh)) {
           $lig = fgets($fh, 4096) ;
           if (strlen($lig)>0) {
               $nbl++ ;
               ## pour debug : echo "$nbl : $lig\n" ;
               $tdm = preg_split("/\s+/",trim($lig)) ;
               if ($tdm[0]=="function") {
                  echo sprintf("%04d",$nbl)." : $lig\n" ;
               } ; # fin de si
           } ; # fin si
         } ; # fin tant que
        
         fclose($fh) ;
        
         } # fin de fonction listeFonctions
        
        // exemple d'appel :
        
        ###############################################
        #
        # listeFonctions("fonction_prot.php") ;
        #
        ###############################################
        
        /*
        Résultat :
        
        @janus~/public_html/internet|(~gH) > php -a
        Interactive mode enabled
        php > include("listefns.php") ;
        php > listeFonctions("fonction_prot.php") ;
        
        Liste des fonctions du fichier : fonction_prot.php
        
        0010 : function url_genpept($num_prot) {
        0018 : function url_uniprot($num_prot) {
        0026 : function url_pfam($num_prot) {
        0032 : function url_cdd($num_prot) {
        0039 : function url_fasta($num_prot) {
        0045 : function fasta_to_str($fasta) {
        0055 : function get_fasta($accession) {
        0069 : function calcul_mw($fasta)
        0102 : function calcul_pi($fasta)
        0165 : function compo_aa($fasta,$a)
        
        php > quit
        
        */
        ?>
Si vous préférez, vous pouvez utiliser celle de geshi ou même celle construite autour de la fonction highlight_file.
Listing du fichier listefns.php avec syntaxhighlighter
