$file="/usr/local/projects/file";
$R->send(q`a<-read.table($file)`);