HTML-Embperl
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
$loadmodules = $EPMODPERL ;
$EPPATH = cwd ;
$EPMODPERL = '' ;
$EPSTARTUP ='startup.pl' ;
if ($b && $apache)
{
$EPPORT = 8531 ;
if (!$win32)
{
$EPUSER = getpwuid($>) || $> ;
$EPGROUP = getgrgid($)) || $) ;
if ($EPUSER eq 'root')
{
my $nobody = (getpwnam('nobody'))[0] ;
$EPUSER = $nobody if $nobody ;
}
if ($EPUSER eq 'root')
{
print "Cannot run test httpd as User $EPUSER\n" ;
( run in 0.329 second using v1.01-cache-2.11-cpan-8d75d55dd25 )