use Language::Haskell;
print Language::Haskell->new->eval('foldr (+) 0 [2,2]');