use Statistics::R;
  my $R = Statistics::R->new();
  $R->run(q`mydata <-read.table("mydatafile",... more options here)`);
  my $summary = $R->get(q`summary(mydata)`);
  print $summary;