Subroutinen in Tabelle def. und aufrufen

[Nurmel]

Hallo,
zunächst möchte ich mich bei Kurt Z. bedanken, der jetzt wohl zurück ist aus der "Forenpause" und der mich in dem thread
http://forum.de.selfhtml.org/archiv/2008/3/t167968/#m1095701
sehr unterstützt hat.
Damit habe ich meine Aufgabe gelöst und dabei auch noch einiges gelernt!
Aber mit dem Essen kommt der Appetit!
Daher folgende Frage.
In dem nachfolgenden Beispiel werden alle Routinen mit den Parametern p1 bis p3 aufgerufen.
Ist es möglich, einzelnen Routinen zusätzliche oder andere Parameter mitzugeben?

  
my %prueftab;  
$prueftab{feld1}=[\&pruef1,\&pruef11,\&pruef12];  
$prueftab{feld2}=[\&pruef1,\&pruef2,\&pruef21,\&pruef22\&pruef23];  
#......  
  
# Loop über die Felder ($feld) und darin:  
  
   for my $code_ref ( @{$prueftab{$feld}} ) {  
      my $fehler_text_erg = $code_ref->($p1, $p2, $p3);  
      if ($fehler_text_erg ne "") {  
#   ...  
        }  
#   ...  
    }  

Es soll also z.B. die Prüfung pruef21 mit den Parametern $p1, $p2, $p3
    u n  d     $p4 aufgerufen werden.
(Eine Notlösung wäre, $p4 allen Routinen mitzugeben und sie dort zu ignorieren, bei mehreren solche optionalen Parametern wäre dies allerdings unschön!).
Schönen Sonntagsgruß
Nurmel