view release on metacpan or  search on metacpan

bin/aws-sqsd.in  view on Meta::CPAN

. /etc/rc.d/init.d/functions

prog=aws-sqsd

########################################################################
function find_queue_daemon {
########################################################################

    DAEMON=$(command -v QueueDaemon.pl)
    DAEMON=${DAEMON:-@bindir@/QueueDaemon.pl}

    if ! test -e "$DAEMON"; then
        eval $(perl -MConfig -MData::Dumper -e 'print Config::config_re(qr/installsitebin/);');
        DAEMON="$installsitebin/QueueDaemon.pl"
    fi
    
    if ! test -e "$DAEMON"; then
        echo "could not find QueueDaemon.pl\n";
        exit 1;
    fi