68user's page 掲示板

Prev< No. 957〜962> Next  [最新発言に戻る] [過去ログ一覧]
No. 957 # ST 2000/07/04 (火) 23:25:09
現在、さくらインターネット<http://www.sakura.ad.jp>で専用サーバを借りています。OSはFreeBSD 3.4です。大した知識もないのに大丈夫かな、と思っていたところ、ついに困った事態になりました。

chsh -s
でログインシェルを変更したのですが、誤った名前を指定してしまったのです。それからというもの、スーパーユーザになろうとしても
su: +++: No such file or directory
と出てしまい、rootによる作業が一切できない状況です。

root権限で
chsh -s /bin/sh
でも実行できれば済むのですが、どうすればいいものやら。セキュリティホールを利用できないか、などと本気で考えましたが、そんな技量もありませんでした。

きちんと業者に頼むべきなのでしょうが、Telnetでできる作業は1万円、Telnetでできない作業は2万円と、勉強料としても学生にはかなり惜しくなる出費なのです。

何かいい方法があるなら教えていただけないでしょうか。

No. 958 # 68user 2000/07/05 (水) 00:09:14
> su: +++: No such file or directory
むぅ…多分無理だと思います。一旦 shutdown して
シングルユーザモードで再起動するしかないので
2万円コースだと思います。

あきらめきれなければ、
    http://www.energy.ee.ehime-u.ac.jp/~flathill/FreeBSD/chat/chat.html
で聞いてみて下さい。そこの方々が無理だと言ったら絶対無理です。


あと、回答してもらっても返答する気がないなら、最初から
書き込まないで下さい>返答する気のない人々

No. 959 # has 2000/07/05 (水) 02:52:42
またまたperlについてお聞きします。
連想配列をうまく使って、キーに対して文字列リストを
保持したいと思うのですが、何かよい方法はありますでしょうか。

現在は、文字列を共通のリスト配列に順に格納して、
キーに対する文字列リストの中の最初の文字列へのインデックスを
連想配列に格納する、という方法をとっています。

うまく伝わらないかもしれませんので、少々サンプルを書きます。
$store = 0;
foreach $file (@files) {
        open(IN, $file);
        @contents = <IN>;
        $index{$file} = $store;
        $numlines{$file} = $#contents + 1;
        @lines[$store..$store+$#contents] = @contents;
        $store += $#contents + 1;
}

No. 960 # 68user 2000/07/05 (水) 08:55:56
要は、ファイル名と行番号を与えると、その行が得られるデータ
構造は?、ということでいいですか?

なら、
    while (<IN>){
        $data{$file}{$line}=$_;
        $line++;
    }
とやってもいいし (perl4 的にするなら $data{"$file$line"})、
あるいは
    @contents=<IN>;
    $index{$file}=\@contents;
と、配列へのリファレンスをハッシュに入れてもいいと思います。
参照するときは
    $file = 'abc.txt';
    $line = 123;
    print ${$index{$file}}[$line];
とか (abc.txt の 123行目を表示。先頭が0行目)。

No. 961 # よしだ 2000/07/05 (水) 10:25:26
Netboyさんありがとうございました

> #!/usr/local/bin/perlで参照できると思います.
> お試しください.
試してみたんですが、
#!E:/usr/local/bin/perl だと動くんですが、
#!/usr/local/bin/perl だと駄目なので
どうもapachの自己完結型がドライブ名の指定が必要みたいでした、
結果は残念でしたけど、どうもありがとうございました。

>あと、回答してもらっても返答する気がないなら、最初から
> 書き込まないで下さい>返答する気のない人々
すみません、原因が解ったら書き込もうと思っていたので
返答が遅くなってしまいました
以後気をつけます。

No. 962 # Netboy [E-mail] 2000/07/05 (水) 11:48:16
よしださん

次のようなショートカットからApacheを実行してみてください.
'作業フォルダ'のパスにあるドライブ名が,Perlの参照先ドライブになります.
動作を確認後にオプションを追加して,サービスとして実行させてください.

リンク先:
e:\usr\local\sbin\apache\Apache.exe -f e:\usr\local\etc\apache\conf\httpd.conf -s

作業フォルダ:
e:\usr\local\sbin\apache

# 2つとも,Apache.exeがe:\usr\local\sbin\apacheにあるとき

- - - - - - - - - - - - - - -
参考になるURLをご紹介します:

NTでIISやApacheのPerlの参照の設定:
http://www.hi-ho.ne.jp/lina/httpd.html#apache-pl

Apacheのレジストリ操作,NTサービスとしての実行など:
http://www.apache.org/docs/windows.html

Prev< No. 957〜962> Next  [最新発言に戻る] [過去ログ一覧]