4c4cb98772
of Minesweeper in "games"?) This one is written in Perl, so it is convenient for people who would like to script in Perl. PR: 6535 Submitted by: Studded@dal.net
18 lines
351 B
Bash
18 lines
351 B
Bash
#!/bin/sh
|
|
|
|
PREFIX=
|
|
SIRCLIB=${PREFIX}/libexec/sirc ; export SIRCLIB
|
|
|
|
if test -z "$SIRCSERVER" && test -z "$IRCSERVER"
|
|
then
|
|
SIRCSERVER="irc.dal.net"
|
|
export SIRCSERVER
|
|
fi
|
|
|
|
case "$1" in
|
|
-d) shift
|
|
exec ${PREFIX}/bin/perl5 ${SIRCLIB}/dsirc "$@"
|
|
;;
|
|
*) eval exec ${PREFIX}/bin/ssfe $SSFE ${PREFIX}/bin/perl5 ${SIRCLIB}/dsirc \"\$@\"
|
|
esac
|