kann man pauschal nicht so beantworten. woher kommt $modnr (und wieso heisst es "modnr" anstatt "subnr"?).
am saubersten wäre wohl eine dispatch-tabelle. kommt die variable $modnr aus dem programm selbst, geht auch der aufruf von can().
und oft vermeidet man so einen kram gleich ganz, wenn man objektorientiert arbeitet.