Names of data frame columns in an apply

I wrote a function to recode 5 variables into one variable. These 5
variables are stored in a data frame. For example:

subjnr time var1 var2 var3 var4 var5 outcome
1      1    1    0    2    1    0    20
2      1    0    1    2    1    0    20

When I try to recode a data set like this, using (something like):

recode <- function(dataline) <-
  type <- 0;
  if (dataline$var1 == 1) {
    type <- 1;
  }
  if (dataline$var2 == 2) {
    type <- 2;
  }
  type
}

apply(data,1,recode)

I don't get what I want, because dataline$var1 always evaluates to NULL.

Is is at all possible to use the $xxx method of refering to columns when
using apply? And if not, is there another way by means of which I can use
column names instead of numbers?

dd<-data.frame(a=1:2,b=3:4)
apply(dd,1,print)

apply(dd,1,mode)