#!/usr/bin/perl -I../lib -Ilib/ -w
use
strict;
my
$host
=
$ENV
{REMOTE_USE_DEVELOPER};
SKIP: {
skip
"This test only run in the developer machine"
, 1
unless
$host
;
system
(
'rm -fR /tmp/perl5lib/* /home/pp2/perl5lib/*'
);
my
$config
= -e
't/rsyncconfigwithscp'
?
't/rsyncconfigwithscp'
:
'rsyncconfigwithscp'
;
Remote::Use->
import
(
config
=>
$config
,
package
=>
'rsyncconfigwithscp'
);
Math::Prime::XS->
import
(
':all'
);
is_deeply([ primes(9) ], [2, 3, 5, 7],
'Math::Prime::XS imported and working'
);
}