Code referenzieren

[hotti]

hi Struppi,

"Gehen" tut natürlich beides, es ist nur etwas völlig unterschiedliches.

danke auch Dir, ja ist klar jetzt, was passiert. Also ich nehme dann doch die Referenz ;-)

Es ist so, dass ich nicht gerne eine print-Liste unterbreche, daher geben meine Funktionen nicht selbst was aus, sondern haben einen Rückgabewert, der in die print-Anweisungs-Liste eingebaut wird. Das Array in meinem Menu-Hash soll natürlich klein bleiben, klar da muss ne Referenz rein:

  
# Struktur für Menu und Eingangsseite  
my %menu = (  
    1 => ['HTML', 'HTML-Inhalte erstellen und bearbeiten, CSS-Dateien, Titel, Ordner und andere Attribute den Inhalten zuweisen.', \&htmlmanager],  
    2 => ['CSS','Dateien für Cascading Stylesheets erstellen und bearbeiten.', \&cssmanager],  
);  
###########################################################################  
use strict;  
use CGI;  
  
my $u = new CGI;  
  
if($u->param){  
    if(my $mnr = $u->param('menu')){  
        print $u->header($hth), $u->start_html($htu), $u->h1($htu->{title}), $menu{$mnr}->[2]->(), qq(<p><a href="$ENV{SCRIPT_NAME}">Zum Editor Hauptindex</a></p>), $u->end_html;  
    }  
    else{  
    }  
# usw.  

Morgen gehts dann weiter mit dem kleinen Script, d.h., fertig isses schon, muss nur noch tippen.

Grüße nach Mainz!
Hotti