view release on metacpan or  search on metacpan

lib/Catalyst/Helper/InitScript/FreeBSD.pm  view on Meta::CPAN

           -mysql      run after init mysql. [default is no]
           -postgresql run after init postgresql. [default is no]

    % ./script/yourapp_create.pl InitScript::FreeBSD -- -nproc 2 -mysql 
    /usr/home/bokutin/svk/YourApp/trunk/script/../yourapp.sh.sample is exist.
            overwrite? (y or n) [default n] y
    /usr/home/bokutin/svk/YourApp/trunk/script/../yourapp.sh.sample was created.

    The following commands were needed to complete setting up.
    % sudo cp /usr/home/bokutin/svk/YourApp/trunk/script/../yourapp.sh.sample /usr/local/etc/rc.d/yourapp.sh
    % sudo chmod 755 /usr/local/etc/rc.d/yourapp.sh
    % sudo touch /var/run/yourapp.pid
    % sudo touch /var/run/yourapp.sockets

=cut

=head2 mk_stuff

=cut

sub mk_stuff {

lib/Catalyst/Helper/InitScript/FreeBSD.pm  view on Meta::CPAN

        return 0;
    }
    else {
        $class->_render_file($helper, $vars, $output);

        my @msgs;
        push @msgs, "$output was created.";
        push @msgs, "";
        push @msgs, "The following commands were needed to complete setting up.";
        push @msgs, "% sudo cp $output /usr/local/etc/rc.d/$vars->{app}.sh";
        push @msgs, "% sudo chmod 755 /usr/local/etc/rc.d/$vars->{app}.sh";
        push @msgs, "% sudo touch $vars->{pidfile}";
        push @msgs, "% sudo touch $vars->{listen}" if $vars->{use_socket};

        print join("\n", @msgs), "\n";
    }

    return 1;
}

sub _usage {