Вот быстрое решение с использованием функции apply()
в базовом пакете.
# generating a sample df
df <- as.data.frame(matrix(runif(20),nrow=4))
# using apply function to calculate the product of each column
# returns a vector
# prod = product of numbers
# margin = 2 applies it on each column
prodcol <- apply(df,FUN=prod,MARGIN=2)
Как сделать, это описано в mod_perl документации здесь. В частности, считайте раздел "Registry Scripts".
Я вполне уверен, пока Вам загрузили модуль, можно просто добавить a
AddHandler mod_perl .pl