view release on metacpan or  search on metacpan

default-install/default-install.pl  view on Meta::CPAN

  }
}

sub create_workingdir () {
  if (-d $::LC_DIR ) {
    warn "LinkController Working directory $::LC_DIR already present";
  } else {
    mkpath("$::LC_DIR") or warn "working directory creation failed";
    my ($login,$pass,$uid,$gid) = getpwnam($::LC_USER)
        or die "$::LC_USER user not in passwd file.  Can't create directory.";
    chown ($uid, $gid, $::LC_DIR);
  }
}

sub delete_workingdir () {
  if (-d $::LC_DIR ) {
    #fixme: delete even in the presence of certain dotfiles:
    # .bashrc .xauth
    rmdir($::LC_DIR) or warn "working directory ($::LC_DIR) deletion failed $!";
  } else {
    warn "LinkController Working directory $::LC_DIR not present";

make-rpm-command  view on Meta::CPAN

make clean
perl Makefile.PL
ID=`id -u`;
if [ x"$ID" != x"0" ]
then
	MAKERPMOPTS="$MAKERPMOPTS --nochown"
        export MAKERPMOPTS
	echo FIXME wrong directory permission for /var/lib/linkcont >&2
fi

DISTFILE=Link_Controller-0.037.tar.gz
rm $DISTFILE
make
make dist
cp $DISTFILE /usr/src/redhat/SOURCES
/usr/src/redhat/SOURCES/makerpm.pl $MAKERPMOPTS --noname-prefix --specs --runtests --auto-desc --source=$DISTFILE