plum の自動起動 (rc.local)

cd /
perl /home/odw/plum
では起動しない

cd ~odw
perl /home/odw/plum
で起動する

このため
echo '/usr/bin/perl /home/odw/plum ' | su -f -m odw
では起動しない

&'load('', "$NAME.conf") if -r "$NAME.conf";
foreach $user (@ARGV) {
  &'load($user, "$NAME-$user.conf") if -r "$NAME-$user.conf";
}

exit unless @'username; ←ここで＼(^o^)／

print $NAME, ' ', $VERSION, "\n";

$NAME がフルパスに成ってないから?

if ($0 =~ /^(.*)[\\\/][^\\\/]*$/) {
  unshift(@INC, "$1/module");
  $NAME = "$1/$NAME"; ←ここ追加
} else {
  unshift(@INC, './module');
  $NAME = "./$NAME"; ←ここ追加
}

select((select(STDOUT), $| = 1)[0]);
select((select(STDERR), $| = 1)[0]);

perl /home/odw/plum

/home/odw/plum 2.33

これでうごいたので
/etc/rc.local に
echo '/usr/bin/perl /home/odw/plum ' | su -f -m odw
ついかして自動起動。

*1

もう一方の鯖はcd してるww

*1:設定はplum.confにしています。