sub setup_R {
        use lib "/usr/lib64/R/";
	use lib "/usr/local/src/RSPerl/src/";
	use R;
	use RReferences;

        use R qw{startR};
	R::startR();

        &R::startR("--silent");