68user's page 掲示板: 過去ログ

68user's page 掲示板

Prev< No. 4836～4936> Next [最新発言に戻る] [過去ログ一覧]

No. 4836 # べた 2007/09/27 (木) 10:05:21

前にも同じ質問をしたのですが、
findの検索で、指定ディレクトリ（カレントディレクトリ）内の
ファイルだけを検索し、-mtimeを指定して、30日前のファイルを
削除しようとしています。

配下のディレクトリを検索しないよう、-prune　を指定して、まずは、
以下のようにしたのですが、”*.csv”以外が表示されていまいます。

find /home/DATA/backup -name '*.csv' -o -name everyday -prune -o -name monthly -prune -o -name tmp -prune -o -name work -prune -o -print
と実行すると、
カレントディレクトリと、「*.csv」以外のファイルが表示されます。

find /home/DATA/backup -name '*.csv' -o -name everyday -prune -o -name monthly -prune -o -name tmp -prune -o -name work -prune -o -mtime +30
と実行すると、
表示されるのですが、どこのディレクトリを検査した結果かわからない状態でして、

確認と実際は、rm　を指定してファイルを削除するで、「-exec ls -l {} \;」
をして表示してみたのですが、
find /home/DATA/backup -name '*.csv' -o -name everyday -prune -o -name monthly -prune -o -name tmp -prune -o -name work -prune -o -mtime +30 -exec ls -l {} \;
と実行すると、
何も表示されません。

find /home/DATA/backup -name '*.csv' -o -name everyday -prune -o -name monthly -prune -o -name tmp -prune -o -name work -prune -o -mtime +30 -print
と実行すると、
何も表示されません。

正しく、結果が表示されるように、
最終的には、30日前とか、90日前のファイルが削除できるように
したいのですが、どのようにすればよいか、
教えてください。

No. 4837 # 68user 2007/09/29 (土) 14:20:52

>>4836 べた
> find /home/DATA/backup -name '*.csv' -o -name everyday -prune -o -name monthly -prune -o -name tmp -prune -o -name work -prune -o -print
> と実行すると、
> カレントディレクトリと、「*.csv」以外のファイルが表示されます。
この結果がすでにマズいんですよね?

前回のわたしの回答
>>4763 68user
は的外れだったような気がします。最終的には以下のようになるのではないかと思います。
    % find /home/DATA/backup -name '*.csv' -mtime +30 -exec ls -l {} \; -o -name everyday -prune -o -name monthly -prune -o -name tmp -prune -o -name work -prune

構造としては
    ・[ファイル名が *.csv] AND [mtime が +30] AND [-exec ls -l]
        OR
    ・[ファイル名が everyday] AND [-prune]
        OR
    ・[ファイル名が monthly] AND [-prune]
        OR
        (略)
となります。

ただし -exec や -prune は常に真で、コマンドを実行する・ディレクトリを下降しない
という副作用を発生させるのが主目的ですので、より平易に書くと
    ・[ファイル名が *.csv] AND [mtime が +30] なら [-exec ls -l] を実行
        OR
    ・[ファイル名が everyday] なら [-prune] で下降抑止
        OR
    ・[ファイル名が monthly] なら [-prune] で下降抑止
        OR
        (略)
となります。なお、ここでの OR は、左辺が真なら右辺は評価しない、
という意味です。また、OR の各要素の順序を入れ替えても、このケース
では問題ありません (*.csv と everyday が両方真になることはないので)。

典型的な -prune の使い方をまとめると以下のようになると考えます。
      - 特定のディレクトリ以外について何か (-print) を行う
              ⇒ find . -name hoge -prune -o -print
      - 特定のパターンのファイルに何か (-ls) を行うが、特定ディレクトリ以下は除外する
              ⇒ find . -name \*.csv -ls -o -name hoge -prune
      - 特定のパターンのファイルに何か (-print) を行うが、特定ディレクトリだけは
          除外する。ただし特定のパターンにも特定のディレクトリにも一致しない場合は、
          別の何かを行う (-ls)。
              ⇒ find . -name \*.csv -print -o -name hoge -prune -o -ls

No. 4838 # べた 2007/10/01 (月) 19:50:45

>>4837 68user
ありがとうございます。
返事遅れてすみません。

一度、内容を読んで、確認してみます。
それで、再度、質問します。

No. 4839 # べた 2007/10/04 (木) 09:37:55

>>4837 68user
ありがとうございます。
期待した結果が得られました。

No. 4840 # まるこ 2007/10/11 (木) 10:40:25

はじめまして。
以下のページを見て質問させていただきます。
http://x68000.q-e-d.net/~68user/net/http-1.html

telnet（WindowsXPに標準でついていたものです）で、
% telnet www.cs.gunma-u.ac.jp 80
とコマンドを打っても、コマンドが無効です、と出てしまいます。
ここで詰まってしまって、先へ進めないでいます。
helpを見てみて、openかなと思ったのですが、それでも接続できない状況です。
googleで検索してもみたのですが、要領を得ませんでした・・・
何か解決法はないでしょうか？
プロバイダからは、特別なproxyを使わないと駄目ですとは言われていません。

よろしくお願いします。

No. 4841 # 68user 2007/10/13 (土) 03:22:19

>>4840 まるこ
telnet の起動の仕方を勘違いしているように見えます。

スタート > すべてのプログラム > アクセサリで
    コマンドプロンプト
を起動します。するとウィンドウが開き
    Microsoft Windows XP [Version 5.1.2600]
    (C) Copyright 1985-2001 Microsoft Corp.

    C:\Documents and Settings\user>
などと表示されるはずです。

ここで
    telnet www.cs.gunma-u.ac.jp 80
とタイプしてください。
    http://x68000.q-e-d.net/~68user/net/win-telnet.html
にあるとおりエコーバックはされませんが、
    GET / HTTP/1.0(Enter)
    (Enter)
とすると取得した HTML が表示されるはずです。「(Enter)」は
XP であれば普通に Enter キー押下でいけると思います。

No. 4842 # yuki 2007/10/16 (火) 20:25:23

はじめまして。
以下のページを参考にさせていただきまして、質問させていただきます。
http://x68000.q-e-d.net/~68user/webcgi/char-code-2.html

以下のように機種依存文字のチェックをさせてみたところ
「丁目」という文字がC3FA CCDCとなり、FACCが90区のチェックに
引っかかってしまいました。

$fradrs = $_POST['adrs'];
$check = mb_convert_encoding($fradrs,'EUC-JP');
if (ereg("\x8E[\xA0-\xDF]|[\xAD\xF9\xFA\xFB\xFC][\xA1-\xFE]", $check)) {

こういった場合はどのように対処したらよいでしょうか。
よろしくお願いします。

No. 4843 # 68user 2007/10/16 (火) 20:41:06

>>4842 yuki
そのページでも紹介していますが、文字単位でマッチさせるために
http://www.din.or.jp/~ohzaki/perl.htm#JP_Match
という工夫をしています。

PHP であれば mb 系の関数を使えば文字単位で切り出せると思いますが、
いわゆる機種依存文字に対応しているかどうかわからないのでまずは
試してみてください。対応していなければ、上記のようなやり方で
1文字ずつ取り出す必要があるかもしれません。

No. 4844 # yuki 2007/10/19 (金) 14:15:48

>>4843 68user様
ご助言ありがとうございます。
ご案内いただいたページを参考にして以下のように記述したところ
想定通りに動くことを確認できました。

$ascii = '[\x00-\x7F]';
$twoBytes = '[\x8E\xA1-\xFE][\xA1-\xFE]';
$threeBytes = '\x8F[\xA1-\xFE][\xA1-\xFE]';

$fradrs = $_POST['adrs'];
$check = mb_convert_encoding($fradrs,'EUC-JP');
if (ereg("^($ascii|$twoBytes|$threeBytes)*(\x8E[\xA0-\xDF]|[\xAD\xF9\xFA\xFB\xFC][\xA1-\xFE])", $check)) {
echo "マッチしました。\n";

mb系は私の未熟さゆえかうまく動作しませんでした…。
68user様、ありがとうございました。

No. 4845 # 2323 2007/10/19 (金) 15:22:54

http://x68000.q-e-d.net/~68user/unix/pickup?freebsd-update
freebsd-updateでぐぐると上位に引っかかり、拝見しました。
「あくまで 5.1-STABLEを追っかけている」という記述がありますが、
おっかけている(いた)のは'5.1 security fix branch'(RELENG_5_1)で、
5.1-STABLEというブランチは存在しないです。
また'5-STABLE'も5.1-RELEASEをブランチした直後以外は
5.1相当ではなかったわけなので、やはり5.1-STABLEという記述は
修正されたほうが良いかと思います。

No. 4846 # yuki 2007/10/19 (金) 16:11:44

>>4844 yuki
何度も申し訳ありません。
4844の記述ではうまく動かないですね…。
機種依存文字が文頭にある場合のみ動作して
2文字目以降にある場合にはマッチしてくれないです。
正規表現についてもう少し勉強してきます。

No. 4847 # 68user 2007/10/31 (水) 00:33:11

>>4846 yuki
ダメですかねぇ? あっているような気がしますが。
$_POST['adrs']・$check のデータを明示いただければ何かしら回答できるかもしれません。

>>4845 2323
よく理解していないので確認させていただきたいのですが、
「あくまで 5.1-STABLE を追っかけているに過ぎない」
を
「あくまで '5.1 security fix branch' (RELENG_5_1) を追っかけているに過ぎない」
とすれば正確な表現と言えるでしょうか。

No. 4848 # yino [E-mail] 2007/11/09 (金) 03:18:57

はじめまして。
突然ですが、ご教授ください。

私は今、大学４年生で卒業研究をしているのですが、ネットワークプログラムを作る必要が出てきてしまいました。
ですが、私はプログラミングは全くの初心者で、どの言語を使えば良いのか、何から始めればいいのかもよく分かりません。
どなたかアドバイスや、参考となりそうなプログラムやサイトを教えて頂けませんか？

OSはKNOPPIXで、アドホックモード(OLSR)での動画の転送をしたいです。
転送さえできればいいとのことなので、プログラム自体は簡単なものでいいようです。

場違いな質問かもしれませんがよろしくお願いいたします。

No. 4849 # バンガード 2007/11/09 (金) 09:14:02

>>4848 yino
残念ながら聞いた事もないOSですので、お力になれません。
ただ、この様な場合、ひたすら検索サイトでキーワードを入れて検索してみてはいかがですか？
就職しても、この辺りは変わりません。
まずは、片っ端から検索して自分の目的としている情報が載っているサイトを探してみましょう。

No. 4850 # 68user 2007/11/09 (金) 09:38:11

>>4849 バンガード
OLSR はプロトコルのようです。

>>4848 yino
わたしなら
    1. まわりに言語の有識者がいるか
    2. その言語向けのネットワークプログラミング関連の書籍が出版されているか
    3. ネットワークプログラミング向きか
    4. プログラミング初心者が扱いやすい言語か
という観点で考えます。

1 は、まわりを見渡してください (Java が多いのではないかと想像しますが)。
これが最重要だと思います。

2 は、Java が一番、次点が Perl でしょうか。PHP・Ruby はこの点は弱い。

3 は、本質的にはどの言語でも同じでしょうが、PHP などは無駄にハマりやすそうな
気がします。

4 は、まぁ Java ではないかと。

個人的には、Java がイチオシ、次点が Perl です (自分が書くなら Perl か Ruby)。

No. 4851 # yino [E-mail] 2007/11/09 (金) 14:51:27

>>4850 バンガードさん、 >>4849 68userさん
ありがとうございました。
とりあえずは周りの人から話を聞いてみたいと思います。
あとはJavaの本を読んでいきたいと思います。

また壁にあたったときはここに来ると思いますので、よろしくお願いします。

No. 4852 # aki 2007/11/12 (月) 15:55:35

はじめまして。
いきなりですが教えてほしいことがあります。

大学の課題でサーバの存在するマシンのカレントディレクトリにおけるファ
イル一覧を表示する。
＜LIST＞と打ち込むとファイルの一覧を表示する
＜GET ファイル名＞打ち込むと、ファイルの内容を表示する
＜PUT ファイル名＞でファイルをアップロードする。
＜QUIT>と打ち込むとサービス終了。と言うプログラムを作っていたのですが
うまく実行できません。どこが間違っているか教えていただけませんか。

#include <netdb.h>
#include <stdio.h>
#include <fcntl.h>

#define BUFMAX 45
#define PORT_NO 10092
#define Err(x) {fprintf(stderr,"server- ");perror(x); exit(0);}

static char rmsg[10], smsg[BUFMAX];
static int sofd, nsofd;
static struct sockaddr_in sv_addr, cl_addr;
static struct hostent *shost;
static char shostname[100];

int msgpro(void);

int main(int argc, char **argv)
{
    int cadlen;
    DIR *dirHandle;
    struct dirent *dirEntry;

    dirHandle=opendir(".");
          if(dirHandle){
              while(0!=(dirEntry=readdir(dirHandle))){
     puts(dirEntry->d_name);
              }
              closedir(dirHandle);
          }

    sofd = socket(AF_INET, SOCK_STREAM, 0);
    if(sofd < 0)
        Err("socket");
    if(gethostname(shostname, sizeof(shostname)) < 0)
        Err("gethostname");

    shost = gethostbyname(shostname);
    if(shost == NULL)
        Err("gethostbyname");

    bzero((char *)&sv_addr, sizeof(sv_addr));
    sv_addr.sin_family = AF_INET;
    sv_addr.sin_port = htons(PORT_NO);
    memcpy((char *)&sv_addr.sin_addr, (char *)shost -> h_addr, shost -> h_length);

    if (bind(sofd,(struct sockaddr *)&sv_addr, sizeof(sv_addr)) < 0)
          Err("bind");

          if(listen(sofd, 1) == -1)
          Err("listen");

          while(1){
              cadlen = sizeof(cl_addr);
              if((nsofd = accept(sofd, (struct sockaddr *)&cl_addr, &cadlen)) <0)
     Err("accept");


              if(fork() == 0)
     if(msgpro()==-1){
     close(nsofd);
     printf("END SERVER\n");
     if(shutdown(nsofd, 2) < 0)
     Err("shutdown");
                      close(nsofd);
     exit(1);
     }
                  close(nsofd);
          }
  }

int msgpro(void)
{
    int cc, cadlen,nbyte;
    FILE *fp;

    DIR *dp;

    struct dirent *p;
    char *tmp[100];
    int i,f;
    i=0;
    close(sofd);

    if(recv(nsofd, rmsg, 10, 0) < 0){ perror("recv");}

    printf("%s\n",rmsg);

    if(strcmp(rmsg,"QUIT:")==0){
        return -1;}


    if(strcmp(rmsg,"LIST:")==0){
            printf("LSIT:\n");
            dp=opendir("./");
            while((p=readdir(dp))!=NULL){
     tmp[i]=p->d_name;
     strcat(tmp[i],"\n");
     i++;
            }
            closedir(dp);
            tmp[i]=".";

            for(f=2;f<=i;f++){
    nbyte = strlen(tmp[f]);
                if(send(nsofd, tmp[f], nbyte, 0) < 0)
     perror("send");
    }
    }else{
        int i;
        char filename[10];
            if(strncmp(rmsg,"GET:",4)==0){
                printf("%s\n",rmsg);
    for(i=4;i<=strlen(rmsg);i++){
     filename[i-4]=rmsg[i];
    }
    fp = fopen(filename,"r");
    while(fgets(smsg, BUFMAX, fp) != NULL){
     nbyte = strlen(smsg);
     if(send(nsofd, smsg, nbyte, 0) < 0)
     perror("send");
    }
    fclose(fp);
            }else{
     if(strcmp(rmsg,"QUIT:")==0){
     printf("shutdown\n");
     return -1;
     }else{
     printf("Command not Fountd.\n");
     strcpy(smsg,"Command not Found.\n.");
     nbyte = strlen(smsg);
     if(send(nsofd, smsg, nbyte, 0) < 0)
     perror("send");
     }
            }
    }

    if(shutdown(nsofd, 2) < 0)
        Err("shutdown");
        close(nsofd);
        exit(0);
}

No. 4853 # 68user 2007/11/12 (月) 16:07:19

>>4852 aki
> うまく実行できません。
何をどうしたらどうなるのか明示してください。

No. 4854 # aki 2007/11/12 (月) 16:13:39

>>68userさん
すみません。
実行した後にＬＩＳＴ、GET ファイル名、PUT ファイル名、QUITなど打ち込んでもなにも
おきないんです。

No. 4855 # 68user 2007/11/12 (月) 16:59:12

>>4854 aki
提示いただいたプログラムはサーバ側のプログラムであって、
    1. サーバを実行する
    2. 別途 telnet コマンドなどを用いてクライアント側からサーバにアクセス
          (telnet localhost 10092 など)
    3. そこで LIST などをタイプする
というものですが、それは理解した上での質問でしょうか?

もし理解していないのであれば、まずはまわりの人に聞くとか、資料を
もっと読むなどして概念を理解してからでないと効率が悪いと思います。

プログラム自体については、telnet 上から
      LIST:(Ctrl-D)
などと変な送信の仕方をする必要がありましたが、一応動くようです。

No. 4856 # aki 2007/11/12 (月) 17:08:01

>>4855 68userさん
ありがとうございます。
よく理解できてなかったみたいなのでもう少し友達に聞いてみます

No. 4857 # aya 2007/12/06 (木) 01:00:19

今度大学の課題でマルチスレッドサーバを作成することになったので、
http://x68000.q-e-d.net/~68user/net/echo-4.html
を参考にマルチスレッドサーバについて勉強している者です。
そこで、素朴に疑問があるのですが、
このページに書いてある内容は、本当にマルチスレッドなのでしょうか？
マルチスレッドというと処理が平行して行われるという認識なのですが、
この実装では多数のソケットからデータが到着したソケットを順次選択して
処理をする、というように見られるのですが・・・。
これはマルチスレッドサーバと呼んでもよろしいのでしょうか？

No. 4858 # masa 2007/12/09 (日) 08:57:28

HTTP1.1でKeepAliveでHTTPSサーバに接続した場合に、サーバからの
レスポンスの長さが短い(500バイト以下程度)場合、クライアントが
タイムアウトとなりサーバからのレスポンスが読めません。
サーバ・クライアント共にFEDORAを使用しており、クライアントは
TCP/IPのソケット、OpemSslを使って作成しています。
対処方法は何かありますでしょうか？

No. 4859 # 68user 2007/12/12 (水) 18:59:29

>>4857 aya
どうなんでしょうか。以前に同様の指摘があった場合は
>>3223 int
>>3224 68user
>>3226 Netboy
>>3227 68user
というところで止まっています。その後、わたしの知識は増えていないため、
まだ疑問のままです。

>>4858 masa
ソースを提示願います。

なお、本日より数日～数週間の間、返事がしにくい状況になりそうなので、
ご了承ください。

No. 4860 # masa 2007/12/13 (木) 00:31:00

>>4859 68user さん

解決しました。
読み込もうとしているバッファサイズが大きすぎたようです。

No. 4861 # toshi7 2008/01/11 (金) 22:42:16

remshについて知っている方はご教授願います。
環境:HP-UX 11

今シェルを作成しているのですが、あるAPサーバのシェルの中でremshをして他のDBサーバでミドルのコマンド（HiRDBのスケジューラ）
の結果とそのリターン値の標準出力をファイルに吐き出すと言う処理をしています。
$USER_Aでシェルを実行（HOST=DBサーバ）
# remsh $HOST -l $USER_B -n ". .profile 2>&- ; \$DIR/bin/HiRDBのコマンド ; echo \$? " > $FILE

この場合開発環境ではうまく標準出力の結果をファイルに吐き出せるのですが、
顧客本番環境ではうまくいきません。
結果を見る限り、.profileが読み込めてない、またはミドルのコマンドが読み込めていない、と言った感じです。
ちなみに、DBサーバ側の$USER_Bの.rhostsには[APサーバ $USER_A]が記載されています。

この際remshの後のコマンドが実行されていない原因として疑わしき点を教えていただきたいです。
たとえば.profileに問題ありなど…。
お願いいたします。

No. 4862 # 68user 2008/01/12 (土) 11:29:45

>>4861 toshi7
思いつくのは

- remsh 後のカレントディレクトリが異なる
- ログイン後の環境変数が異なる
- 出力先のパーミッションが異なる
- HiRDB のコマンドの場所が異なる
- HiRDB のコマンドがエラーとなっている
        → HiRDB を実行するのではなく、適当な自作プログラムを実行し、
              起動されているかどうかログ等に記録する
- 標準エラー出力を閉じているので、HiRDB の標準エラー出力への
    出力が出力されていない (もしくは write(2) でエラーになるため
    途中でこけている)

くらいでしょうか。

No. 4863 # toshi7 2008/01/17 (木) 22:57:54

>>4862 68user
68userさん
ありがとうございます。
調査を進めているところですが、HiRDBのコマンドでエラーになっている可能性が大です。
また、今週or来週中にもremshのテストができる予定ですので、
# remsh $HOST -l $USER_B -n ". .profile 2>&- ; \$DIR/bin/HiRDBのコマンド ; echo \$? " > $FILE 2>&1
で標準エラーを出力してみます。
ちなみにサーバ側の"last | more"の結果を見る限りremsh自体は届いているようでした。

また、テストの結果不明点がありましたら、質問させていただいてもよろしいでしょうか？
宜しくお願いします。

No. 4864 # 68user 2008/01/20 (日) 20:23:55

少しずつですが
UNIXの部屋
http://x68000.q-e-d.net/~68user/unix/
の各コンテンツを手始めに、Web 全体のデザインを変更していきます。
もし不具合があれば教えていただければ幸いです。

No. 4867 # Ponta [E-mail] 2008/01/27 (日) 13:07:52

68userさま。いつも、初心者に有り難いサンプルをたくさんご提供いただき
ありがとうございます。
HttpClientHttpURLConnectionを走らせたところ、ブラウザで見ると日本語の部分
が、文字化けしています。yahooのページを始め、いくつか試したのですが同じ
状態です。化けないようにするにはどうしたら良いのでしょうか？
お忙しい中恐縮ですが、どなたかご教示下さい。

No. 4868 # 68user 2008/01/30 (水) 13:41:40

>>4867 Ponta
http://x68000.q-e-d.net/~68user/net/java-http-url-connection-1.html
ですよね?

「ブラウザで見ると」の意味がわかりません。実行例にあるとおり、
コマンドラインからの実行を前提としています。

No. 4869 # しも [E-mail] 2008/02/06 (水) 10:33:11

初めて質問させていただきます。
12月から本格的にUNIXの勉強を始めて、現在はHP-UXの業務に就いております。
参考資料を購入したり、netで調べるもどうしても見つからない。。

質問内容：
ファイルサイズをbyteで表示させるコマンドが知りたいです。

データ移行作業をしているので、移行前マシンと移行後のマシンでの
容量チェックをしなくてはいけなくて。。。
大変初歩的質問で申し訳ないのですが、ご教授下さい。

※HP-UX　11iを使用しております。

No. 4870 # 68user 2008/02/06 (水) 11:42:01

>>4869 しも
よくわかりませんが ls(1) の結果は使えないんでしたっけ?
あとは cksum・wc・find とか。それ以外なら awk・perl あたりでしょうか。

cksum
    http://docs.hp.com/ja/B2355-60129/cksum.1.html
wc
    http://docs.hp.com/ja/B2355-60129/wc.1.html
find . -ls
    http://docs.hp.com/ja/B2355-60129/find.1.html

No. 4871 # しも [E-mail] 2008/02/06 (水) 17:47:36

>>4870 68user
ありがとうございます。
ファイル個々のサイズはcksumやwcで確かに確認できました。
ディレクトリのサイズはbyte表示させる事は不可能なのでしょうか？

duを使用しましたが、KBだったのとブロック単位でした。

No. 4872 # 68user 2008/02/06 (水) 20:57:05

>>4871 しも
HP-UX に限らず、du ではブロックカウント機能しかないと思います。
http://sonic64.com/2004-05-26.html
のように自前でカウントするしかないでしょう。

No. 4873 # 大臣 2008/02/07 (木) 15:45:40

cygwinでbash　not　find　：bash.exeというエラーがでんだけどどうすれば
いいか教えろ！！！！！どーせ暇だろ！ニート諸君、俺様の変わりに調べろ！
パスの設定はしてある。
俺も暇じゃないから５分やるですぐ調べて返信しろ。貴様らは蛆虫だ。
./bashrc等も完璧
しかーーーーし動かん。楽勝だて。

No. 4874 # ふくし 2008/02/08 (金) 17:11:14

お世話になります。
質問のときだけ現れてスミマセン。
Perl で、

filename -> title
aaa.html -> aaaについて
bbb.html -> bbbについて
ccc.html -> cccについて

みたいなタブ区切りのテキストを読んで処理するとき、カンタンには

while (<>) {
($filename, $title) = <>;
}

のようにすると思いますが、１行目に見出しが入っていて、
これを捨てたいと思います。

今は、

$trash = <>;
while (<>) {
($filename, $title) = <>;
}

のようにしていますが、
$trash が１回しか使われていませんが書き間違いではありませんか、
という警告が出ます。
警告だから無視すればいいようなものですが、
もっとスマートな書き方はあるでしょうか。

No. 4875 # 68user 2008/02/08 (金) 17:20:10

>>4874 ふくし
- <>;
- my $trash = <>;
- (undef)=<>;
のいずれかでどうでしょうか。Perl5.8.8 では問題ありませんでした。

No. 4876 # ふくし 2008/02/08 (金) 17:51:25

>>4875 68user
さん、ありがとうございます。
いずれも 5.10.0 でもうまくいきました。

(undef) = <>;

というのは自分で思いついていたんですが、
リストコンテクストで評価されて、
全部の行が代入されたのち２行目以降は捨てられる
（１行目も undef だから捨てられる）
ような気がしていました。
ありがとうございます。

No. 4877 # 68user 2008/02/08 (金) 18:48:31

>>4876 ふくし
ああそうですね。書くなら
(undef)=scalar(<IN>);
でしょうか。しかし仕事でこのコード見たらイラッとしますねぇ。

No. 4878 # has 2008/02/09 (土) 00:08:12

>>4873 大臣
ご期待に沿えず残念ですが、たぶん多忙で善良なプロの皆さんとかからの
回答になると思います。
どのくらい完璧か晒したら進言あるかもですよ。

No. 4879 # ふくし 2008/02/13 (水) 10:56:17

そういえば（どういえばだ）以前（数年前）Perl で

goto FIN;
sub foo {}
FIN:

だとエラーになるけど

goto FIN;
FIN:
sub foo {}

または

goto FIN;
sub foo {}
FIN:
;

だとダメ、という件があったんだけど、急に思い立って perlbug してみました。
２時間後に返事が来て（すげえな）perlsyn に書いてあるけど
それはバグではない、ラベルの後には１個以上の文がなければならないと
いうことです。ＦＡＱらしいですね。

No. 4883 # しも [E-mail] 2008/02/14 (木) 15:55:49

>>4872 68user
返信が遅くなりました。
68userさんの仰るように、自分でツールを作成する必要がある事を理解しました。
awkを使って作成しようと思います。
初めて作るので、時間がかかりそうですが結果はまた報告にきます。
ありがとうございました。

No. 4884 # ふくし 2008/02/15 (金) 01:20:39

>>4883 しも
さん、

どっちみち初心者だったら awk より Perl をおすすめします。
汎用性があるし可読性も高くできると思います。
ちょっと書いてみるとこんな感じでしょうか。

★さしでがましければすみません。ここで読むのやめてください ^^

★

★

#! /bin/perl -w
# dsize -- カレントディレクトリ以下のファイルサイズを集計

use File::Find;

$total = 0;
find(\&fileProc, '.');
print "Total\t$size\n";

sub fileProc {
    return unless -f $_;
    $size = -s $_;
    print "$File::Find::name\t$size\n";
    $total += $size;
}

No. 4885 # maya 2008/03/04 (火) 16:06:17

初歩的なことなんですが教えてください。
tar.gz な書庫にファイルを追加したい場合、
いちいちgunzipしないといけないんでしょうか？

なにかスマートな方法はあるんでしょうか？

No. 4886 # つのりん [E-mail] 2008/03/23 (日) 20:10:01

はじめまして、つのりん　と呼んでください。

早速ですがx68k専用マウスが故障しました。

症状はとしては、カーソルは全く異常なく動作しますが、クリックが左右ともできなくなりました。原因はボタン下のマイクロスイッチの故障ではないかと思われます。

なにか対策法はありませんか？

よろしくお願いします。

No. 4887 # mm 2008/03/24 (月) 06:42:58

はじめまして。
http://x68000.q-e-d.net/~68user/unix/pickup?find
findの説明のところで、
-atime 4 4日前にアクセスされたファイル
-ctime 4 ちょうど4日前にファイルステータスが変更されたファイル
-mtime 4 ちょうど3日前に修正されたファイル
と、mtimeだけ3日前となっていますが、これは間違いでしょうか？

No. 4888 # べた 2008/03/25 (火) 12:40:27

findで、検索する文字が複数出てくる場合の
記述について教えてください。

あるディレクトリに、以下の様な「YYYYmmdd」形式の
ディレクトリが存在した場合ですが、名前がすべて、
「0～9」の数字であるディレクトリのみを表示したい
のですが、どのように書けばよいのでしょうか。

find . -name '[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]' -type d
で表示されるのですが、
[0-9]を8回書く以外に、違った書き方はないでしょうか。

find . -name '[0-9]*[0-9]' -type d
find . -name '[0-9]......[0-9]' -type d
find . -name '[0-9]*......[0-9]' -type d
find . -name '[0-9]......*[0-9]' -type d
とかしてみたのですが。

/tmp配下に、
20080301
20080302
20080303
20080303.bk
a0080304
2008030a
200a0306
200080307

No. 4889 # 68user 2008/03/25 (火) 17:25:53

>>4885 maya
> tar.gz な書庫にファイルを追加したい場合、いちいちgunzipしないといけないんでしょうか？
r で追加できますが、gzip してある場合はできないようですので、gunzip が必要と
思われます (BSD tar と GNU tar で確認)。

>>4886 つのりん
ヤフオクによく出品されているように見えますので、チェックしてみてはどうでしょうか
今は「キーボード & マウス [未使用]」が出てますね。

>>4887 mm
> と、mtimeだけ3日前となっていますが、これは間違いでしょうか？
ありがとうございます。誤りでしたので修正いたしました。

>>4888 べた
Perl の正規表現 (PCRE) であれば [0-9]{8} もしくは \d{8} ですが、POSIX における
基本正規表現や拡張正規表現では上記のような表現はできませんので、find にこだわる
のであれば 8回書くしかないです。

あるいは、
    ・File::Find を使った perl のワンライナーでがんばる
    ・シェル変数を使う
            csh・tcsh の場合:
                % set x='[0-9]'
                % find . -name "$x$x$x$x$x$x$x$x"
            sh・bash の場合:
                % x='[0-9]'
                % find . -name "$x$x$x$x$x$x$x$x"
など。

No. 4890 # べた 2008/03/25 (火) 18:30:49

>>4889 68user

ありがとうございます。

No. 4891 # べた 2008/03/26 (水) 15:09:22

perlの使い方なのですが、

日付と時間を表示する簡単なものを作りました。
実行したら動いたのですが、ところが、下記のような
メッセージが出ました。

------------------------------------------------------------
perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
                LC_ALL = (unset),
                LANG = "ja_JP.PCK"
        are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").
------------------------------------------------------------

このメッセージを表示させないようにするには、どうしたらよいか
教えてください。

環境は、Solari8

以下、perlのシェルスクリプト
------------------------------------------------------------
#!/usr/local/bin/perl
#

($day, $mon, $year) = (localtime(time))[3..5];
printf("Today : %04d/%02d/%02d\n",$year+1900,$mon +1,$day);

($sec, $min, $hour) = (localtime(time))[0..2];
printf("Time : %02d:%02d:%02d\n",$hour,$min,$sec);
------------------------------------------------------------

No. 4892 # maya 2008/03/26 (水) 18:52:55

>>4889 68user

なるほど。ここらへんはzipやrarなどと比べると不便ですね。
ありがとうございました。

No. 4893 # 68user 2008/03/26 (水) 18:54:47

>>4891 べた
「perl: warning: Setting locale failed」で検索すれば出てきますが、
環境変数 PERL_BADLANG を設定することで回避可能です。詳細は検索願います。

No. 4894 # つのりん [E-mail] 2008/03/26 (水) 19:31:35

>4889
ありがとうございます。ヤフーのオークション
で見てみます。

No. 4895 # べた 2008/03/27 (木) 11:29:44

>>4893 68user

ありがとうございます。

perlのスクリプトを実行時のみ有効にしたいのです。
perlのスクリプト内で記述する場合はどのように
定義すればよいのですか。

No. 4896 # 68user 2008/03/27 (木) 11:44:00

>>4895 べた
perl コンパイルの際の Configure 時に設定する方法があります。

それが無理なら
    #!/bin/sh
    PERL_BADLANG=0 /foo/bar/baz.pl
と wrapper を作るか、env コマンドで
    #!/usr/bin/env PERL_BADLANG=0 /usr/local/bin/perl
とする手もあります。

No. 4897 # べた 2008/03/27 (木) 12:55:00

>>4896 68user
ありがとうございます。

#!/usr/bin/env PERL_BADLANG=0 /usr/local/bin/perl
#

とperlのスクリプト内に記述して、実行したのですが、
処理がとまったというか、何も応答が返ってきません。

No. 4898 # 68user 2008/03/27 (木) 23:05:24

>>4897 べた
なるほど FreeBSD 5.2.1-RELEASE では動きますが、Linux では確かに
無限ループしてますねぇ。

> #!/usr/bin/env PERL_BADLANG=0 /usr/local/bin/perl
これは FreeBSD 5.2.1-RELEASE では
    /usr/bin/env PERL_BADLANG=0 /usr/local/bin/perl ./hoge
と解釈されますが、Linux や Solaris では
    /usr/bin/env "PERL_BADLANG=0 /usr/local/bin/perl" ./hoge
となるため
    PERL_BADLANG="0 /usr/local/bin/perl"
という環境変数が設定されつつ
    /usr/bin/env ./a
が実行されるものの、./hoge のシェバング行にはまた同じ内容が
書かれているため、永遠に
    execve("./a");
が実行されるということですね。

参考:
    http://x68000.q-e-d.net/~68user/unix/pickup?%A5%B7%A5%A7%A5%D0%A5%F3%A5%B0
    の Tips.2

というわけで env コマンドを使うやり方は移植性がありませんでしたが、
    #!/bin/sh
    PERL_BADLANG=0 /foo/bar/baz.pl
なら動くと思います。Linux では動きました。

No. 4899 # べた 2008/03/28 (金) 12:53:23

>> 4898

> #!/bin/sh
> PERL_BADLANG=0 /foo/bar/baz.pl
>なら動くと思います。Linux では動きました。
で動きました。

色々とありがとうございました。

No. 4900 # 68user 2008/04/02 (水) 19:10:27

さきほどお問い合わせページよりご指摘いただきました、ジャンル一覧リンク切れの件、
修正しました。ご指摘ありがとうございます＞連絡いただいた方

No. 4901 # 68user 2008/04/18 (金) 13:53:44

2年半ぶりの人材募集です。
http://x68000.q-e-d.net/~68user/tmp/job2.html

No. 4902 # TKC 2008/05/02 (金) 14:09:57

こんにちわ。
findコマンドについて教えてください。

■要件
カレントディレクトリに存在する31日以前のファイル＆ディレクトリの削除を実施したい

■コマンド
find ./ -mtime +31 -exec ls {} \; -exec rm -r {} \; >> test.log

■結果
./20070101.trc
find: ./aaa: No such file or directory

■質問１
カレントディレクトリに削除対象となる日付のファイル20070101.trcとディレクトリaaaを配置しています。
削除ファイルの一覧を取得したいため-exec ls {} \;を使用したのですが、
ログには./20070101.trcしか記載がありません。
ディレクトリも表示させるには何かオプションが必要なのでしょうか？

■質問２
実行結果としては削除は行われているのですが戻り値がエラーとなっています。
find: ./aaa: No such file or directoryの部分を指していると思うのですが、
削除後にfindしているように見受けられますがこのエラーの出力原因はなんでしょうか？

1と２の解決方法がありましたら教えてください。
宜しくお願いします。

No. 4903 # 68user 2008/05/02 (金) 16:00:22

>>4902 TKC
まず、-exec の代わりに -ok を使って何が実行されているか確認しましょう。

> ディレクトリも表示させるには何かオプションが必要なのでしょうか？
./aaa/ の中身が空ではないですか? 空であれば ls ./aaa しても何も
表示されないと思います。

> 削除後にfindしているように見受けられますがこのエラーの出力原因は
> なんでしょうか？
find はディレクトリを下降してファイルを探しますが、おそらく
ディレクトリを削除した後にそのディレクトリに下りようとしている
のではないでしょうか。-prune を組み合わせれば下りないように
できるかもしれません (試していません)。

No. 4904 # TKC 2008/05/02 (金) 16:38:38

>>4903 68userさん
-okを使用して確認しました。
ご察しの通り./aaa配下が空のため< ls ... ./aaa >となり
結果的にログに./aaaが出力されていないことがわかりました。

findのエラー原因はやはり削除後に配下に移動しているものと思われます。
rmにデータが渡る前に-pruneを使い解消されました。

最終的には下記で行いたい処理ができました。
find ./ -mtime +31 -prune -exec ls -d {} \; -exec rm -r {} \;

どうもありがとうございました。

No. 4906 # hoge 2008/05/19 (月) 00:21:11

いつもこちらにはお世話になってます。

flexについての指摘です。
http://x68000.q-e-d.net/~68user/unix/pickup?flex

GNUでは作成・配布してないようです。
http://ftp.gnu.org/gnu/flex/flex.README

No. 4907 # 68user 2008/05/19 (月) 23:44:38

>>4906 hoge
> GNUでは作成・配布してないようです。
そうなんですか。知りませんでした。

ftp://ftp.gnu.org/non-gnu/flex/flex.README
      Flex is a free implementation of the well-known Lex program for lexical
      analysis. Since it is not (and never was) a GNU package, we don't
      distribute it here. Please see http://flex.sourceforge.net for the
      latest release and information.

や
flex-2.5.4 (1997年リリース) の README
      Note that flex is distributed under a copyright very similar to that of
      BSD Unix, and not under the GNU General Public License (GPL), except for
      the "configure" script, which is covered by the GPL.

などを見るに、確かに flex が GNU ではないようですね。

しかしこの書籍
    http://www.ascii.co.jp/books/books/detail/4-7561-3097-6.shtml
        Flex入門
        シリーズ：GNUシリーズ
        GNUのツールの1つとして広く使用されているGNUのLexical Scanner Generatorで
        あるFlexの解説書。豊富な例とともに機能を詳細解説
はどうなんですかね。

wikipedia(en) には
    http://en.wikipedia.org/wiki/Flex_lexical_analyser
        Flex is a non-GNU project, but the GNU project developed the manual for Flex.
とありますが、「GNU が作った flex のマニュアル」の翻訳が上記の「Flex 入門」
だったりするんでしょうか。

No. 4908 # 68user 2008/05/19 (月) 23:57:23

>>4907 68user
うーん、やはり 2.5.3 以前は GNU だったのだろうか。

http://cocoa.2ch.net/unix/kako/970/970914036.html より
----- ここから -----
Flex はそもそも non-gnuに移動になって、
下の Flex 2.5.4の COPYING みたいなことになっている。
-=-=-=-=-
Flex carries the copyright used for BSD software, slightly modified
because it originated at the Lawrence Berkeley (not Livermore!) Laboratory,
which operates under a contract with the Department of Energy:

Copyright (c) 1990 The Regents of the University of California.
All rights reserved.

This code is derived from software contributed to Berkeley by
Vern Paxson.

The United States Government has rights in this work pursuant
to contract no. DE-AC03-76SF00098 between the United States
Department of Energy and the University of California.

Redistribution and use in source and binary forms with or without
modification are permitted provided that: (1) source distributions
retain this entire copyright notice and comment, and (2)
distributions including binaries display the following
acknowledgement: ``This product includes software developed by the
University of California, Berkeley and its contributors'' in the
documentation or other materials provided with the distribution and
in all advertising materials mentioning features or use of this
software. Neither the name of the University nor the names of its
contributors may be used to endorse or promote products derived
from this software without specific prior written permission.

THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE.

This basically says "do whatever you please with this software except
remove this notice or take advantage of the University's (or the flex
authors') name".

Note that the "flex.skl" scanner skeleton carries no copyright notice.
You are free to do whatever you please with scanners generated using flex;
for them, you are not even bound by the above copyright.
----- ここまで -----

「non-gnu に移動」という記述はいろんなところにあるが、それを根拠に
「以前は GNU だった」と言いきれない。古い tarball も見つからないし…。

No. 4909 # 68user 2008/05/24 (土) 14:05:02

>>4908 68user
> うーん、やはり 2.5.3 以前は GNU だったのだろうか。
flex-2.5.2/COPYING を確認しましたが、
>> 下の Flex 2.5.4の COPYING みたいなことになっている。
とほぼ同じでした。よって、以前は flex は GNU であったが、
ある時点から GNU でなくなった、などという事実はないようです。

No. 4910 # 68user 2008/05/24 (土) 14:40:56

>>4907 68user
> http://www.ascii.co.jp/books/books/detail/4-7561-3097-6.shtml
> Flex入門
> シリーズ：GNUシリーズ
後はこれだけが気になってしょうがないので、アスキーに「なぜ GNU シリーズなのか」という
問い合わせを投げました。返事来るといいなぁ。

# その前に訳者と思われる方にメールを投げたものの、user unknown で返ってきました。

No. 4912 # hoge 2008/05/30 (金) 00:10:44

問題を投げっぱなしにしてすいません。
PHPのコンパイルに必要だったので探していただけで、
flexについては全く知らないんです^^;

> 「GNU が作った flex のマニュアル」の翻訳が上記の「Flex 入門」
> だったりするんでしょうか。

http://www.gnupress.org/book11.html
GNU Press「Flex: The Lexical Scanner Generator」

http://www.asahi-net.or.jp/~wg5k-ickw/html/online/flex-2.5.4/flex_1.html
訳者の方による、「Flex入門」と同内容のページだと思われます。

ISBNの記述から、ご推察のとおり
「GNU が作った flex のマニュアル」の翻訳が「Flex 入門」
だと考えますが、いかがでしょうか。

No. 4913 # BK 2008/06/04 (水) 14:02:24

http://x68000.q-e-d.net/~68user/net/net-1.html
の[ホスト名とは？]を読んでいましたら、http//133.8.2.24/でhttp//www.cs.gunma-u.ac.jp と同じページが表示されるはずですと
なっていますがが、http//133.8.3.11/でないと表示されないように思います。参考にさせて頂いています。

No. 4914 # 68user 2008/06/13 (金) 10:00:15

>>4912 hoge
flex については更新しております。ご指摘ありがとうございます。
http://x68000.q-e-d.net/~68user/unix/pickup?flex

「GNU シリーズ」についてはアスキーより回答をいただいたのですが、
残念ながら Web での公開は不可とのことなので、墓場まで持っていき
たいと思います。

>>4913 BK
ありがとうございます。取り急ぎ IP アドレスのみ更新しました。

No. 4915 # べた 2008/07/04 (金) 21:17:12

shで、文字列から文字列を取り出そうとしています。

”aaa.bbb@test.cojp”
から「@」より前と後を、

”aaa.bbb"
と
”@test.co.jp”
を取り出したいのです。
どのようにすれば良いか教えてください。

No. 4916 # 68user 2008/07/08 (火) 20:45:49

>>4915 べた
変数 $email にメールアドレスが入っているなら、こんな感じでしょうか。

$ echo $email | sed 's/$.*$@.*/\1/'
aaa
$ echo $email | sed 's/.*$@.*$/\1/'
@bbb.com

No. 4917 # findusi [URL] [E-mail] 2008/07/08 (火) 21:13:16

耶� 闔逅珥蓚� 鰲鉗闔頏琺, 褌辣�� 聽 � 繝� 硴繿� � 驟痳 � 艢裨珞褂 � 鱚閻顫袱聹詹鞐� 癈糂繝� 闔驟塚鴾. 吭鉗闔頏琺粮髓鉗迯詹硴蓐琿� � 辣鴈譛褌 � �髓� 褌迺纃鰰, 邇 � 關鉐鴈 � 矼驟謗竡銓鉋跌纃�. �繖諤窶� 闔驟鱶鴾 <a href=http://www.find-business.ru>跪�</a> 闔頏琺

No. 4918 # べた 2008/07/08 (火) 22:44:17

iconvについて教えてください。

Solaris8で、iconvコマンドを使用しています。
今、使用している環境に、iconvコマンドが２つ入っています。

１．/usr/local/bin/iconv
２．/usr/bin/iconv

１と２は日付、サイズが異なり、１の方が、日付が新しく、サイズも大きいです。
環境変数のパスも両方設定されていて「usr/local/bin」のパスが
先あるので、whichコマンドで調べると、１の方を表示します。

シェルから、iconvを実施したいのですが、どちらの方を使えば
よいのですか。
iconvとしてどうちがうのでしょうか。機能的にも違うのでしょうか。

１．/usr/local/bin/iconv の場合
    コマンドがエラーとなった場合、statusに、”0”か”1”が返る。

    # /usr/local/bin/iconv -f SJIS -t UTF8 sjis_file.txt > utf_file.txt
    iconv: conversion to UTF8 unsupported
    # echo $?
    1
    #

２．/usr/bin/iconv の場合
    コマンドがエラーとなった場合、statusが、”0”となる。
    エラーも表示されない。

    # /usr/bin/iconv -f SJIS -t UTF8 contact_SJIS.txt > uft_file.txt
    # echo $?
    0
    #

シェルから、iconvを実施したいのですが、どちらの方を使えば
よいのですか。
iconvとしてどうちがうのでしょうか。機能的にも違うのでしょうか。

環境は
    Solaris8
    sh(Bシェル)

No. 4919 # べた 2008/07/08 (火) 22:55:38

>4916
ありがとうございます。

expr index "${email}" @
や
echo ${email} | awk '{ print substr($0,1,index($0,"@")-1)}'
や
ANS=`echo ${email} | awk '{printf "%s",index($0,"@")}'`
「@」が最初に現れた位置を取得して、cut で取り出し
echo ${email} | cut -c1-`expr ${ANS} - 1`
echo ${email} | cut -c`expr ${ANS} + 1`

awkや、１回で取り出したかったので、expr でやったのですが、
expr index の形式使えないので、awkでやったのですが、

sed　で置換する方法は気が付きませんでした。
ためして見ます。

No. 4920 # 68user 2008/07/09 (水) 01:38:42

>>4918 べた
/usr/local/bin/iconv は GNU の libconv 同梱の iconv コマンド、
/usr/bin/iconv は Solaris 標準の iconv コマンドではないかと
思います。

GNU 版であれば、--version オプションを使うことで
    % iconv --version
    iconv (GNU libc) 2.3.4
    Copyright (C) 2005 Free Software Foundation, Inc.
    (略)
といった表示が得られるかと思います。

以下は Solaris 版と GNU 版の違いであったとして、という前提ですが、

機能差で選ぶなら↓を比較 (昔の Solaris 版 iconv は、不正なバイト列が
あった場合即終了だった気がするのですが、現在はスキップという選択肢も
選べるんですかね? であればそれほど機能差はないかも)
    http://docs.sun.com/app/docs/doc/819-1210/6n3j74jpk?a=view
    http://www.gnu.org/software/libiconv/documentation/libiconv/iconv.1.html

エンコーディングの多さで選ぶなら、/usr/local/bin/iconv -l と
/usr/lib/iconv/iconv_data を比較。特に CP932 や UTF-8 などが絡む
場合は、手持ちの全ファイルを変換して結果を調べるくらいはやった
方がよいかと思います。

後は GNU が好きか、Solaris の世界で固めるのが好きか、でしょうか。

No. 4921 # zsh 2008/07/09 (水) 10:09:43

>>4919 べた
expr や cut でもできますよ。
(cut の場合は @ が付きませんが。)

$ expr $email : '$.*$@.*'
$ expr $email : '.*$@.*$$'
$ echo $email | cut -d '@' -f 1
$ echo $email | cut -d '@' -f 2

>>4918 べた
Solaris には標準で /usr/local というディレクトリがないので、
68user さんの仰るとおりだと思います。

No. 4923 # べた 2008/07/10 (木) 22:27:06

>>4921 zsh
ありがとうございます。

exprやcutでの使い方ありがとうございます。
勉強になります。

No. 4924 # べた 2008/07/10 (木) 22:28:12

WindowsXP IE6.0 SP2 の別の端末から書き込みを
おこなったら以下のエラー画面が表示されました。

何かインストールされていないものがあるのでしょうか。

エラー : 内部エラーが起こりました。
http://x68000.q-e-d.net/%7E68user/cgi-bin/wwwboard.cgi の実行ができませんで
した。
おそらくCGIプログラムの不具合が原因です。

もし、こちらのファイル設定ミス・リンクミス・CGI の不具合などが原因であった場
合は早急に修正します。

の画面が表示されます。

No. 4925 # べた 2008/07/10 (木) 22:36:19

>>4918 べた
>>4921 zsh

説明ありがとうございます。

それでなのですが、ステータスが返ってくるということで、
「/usr/local/bin/iconv」を使っています。
Bシェルで実行しています。
iconvコマンドをパイプでつないで、連続で実行しています。

/usr/local/bin/iconv -f SJIS -t UTF-8 file_sjis.txt | /usr/local/bin/iconv -f UTF-8 -t UTF-16 > file_utf.txt

１回目のiconv（パイプの左側のiconv）がエラーとなったとき、
ステータスがエラーで返ってきません。
エラーを判断したいのですが、どのようにしたらエラーと判断
できるでしょうか。

/usr/local/bin/iconv -f SJIS -t UTF8 file_sjis.txt | /usr/local/bin/iconv -f UTF-8 -t UTF-16 > file_utf.txt
echo $?

iconv: conversion to UTF8 unsupported
0

”0”が返却。

/usr/local/bin/iconv -f SJIS -t UTF-8 file_sjis.txt | /usr/local/bin/iconv -f UTF-8 -t UTF16 > file_utf.txt
echo $?

iconv: conversion to UTF16 unsupported
1

”1”が返却。

No. 4926 # べた 2008/07/12 (土) 01:29:32

>>4923 べた

ありがとうございます。

$ expr $email : '$.*$@.*'
$ expr $email : '.*$@.*$$'
$ echo $email | cut -d '@' -f 1
$ echo $email | cut -d '@' -f 2

どれでも、取り出せました。

No. 4927 # 68user 2008/07/20 (日) 03:21:17

>>4925 べた
> １回目のiconv（パイプの左側のiconv）がエラーとなったとき、
> ステータスがエラーで返ってきません。
> エラーを判断したいのですが、どのようにしたらエラーと判断
> できるでしょうか。
bash なら PIPESTATUS を使えばよいですが、sh であれば
終了ステータスは取得できないと思います。しょぼいですが、
パイプを使うのをやめるのがよいかと思います。

>>4924 べた
> WindowsXP IE6.0 SP2 の別の端末から書き込みを
> おこなったら以下のエラー画面が表示されました。
IP アドレスや発言内容などから SPAM と判定されたのかもしれません。
特に判定精度の高いものではないので、頻発するようならご連絡ください。

No. 4928 # べた 2008/07/22 (火) 21:53:41

>>4927 68user

ありがとうございます。
sh できないんですね。
出力結果がなければ、出力結果をパイプで渡さなければ
「&&」でいけるのでないかと覆いますが。

パイプを使わず個々に行います。

No. 4929 # べた 2008/07/30 (水) 00:39:04

Solaris8 なのですが、「/var/log/syslog」に、
TCPコネクションのログを出力させたいのです。
telnet、ftpなど、接続したログを出力したいの
です。
どのようにすればよいのでしょうか。

「/etc/syslog.conf」には、以下の様な記述をしています。

user.notice /var/log/syslog

syslogのデーモンも再起動したのですが、出力されません。

No. 4931 # バンガード [E-mail] 2008/08/05 (火) 10:01:38

>>4829 68user
ftpのログを取得するAIXの場合の例です。

#vi /etc/inetd.conf
（ftpのエントリーで最後に「-l」または「-d」オプションを追加）

ftp .... /usr/sbin/ftpd ftpd -l
または　ftpd -d
(転送ファイル名を確認するだけであれば -l オプションの方がログが少なくて済みます)

#refresh -s inetd
（inetdデーモンをリフレッシュ）

#vi /etc/syslog.conf
（syslog設定ファイルにftpのログを取得するためのエントリを追加）

daemon.info /tmp/ftpd.log
(daemon.debugであればもう少し詳しい詳細が確認できます)

#touch /tmp/ftpd.log
（ログファイルを作成）

#refresh -s syslogd
（syslogデーモンを再起動）

No. 4932 # バンガード [E-mail] 2008/08/05 (火) 10:02:46

>>4931 バンガード
ごめんなさい。
4929へのコメントでした。

No. 4933 # べた 2008/08/19 (火) 21:25:01

>>4932 バンガード
お礼が遅れ申し訳ありません。
ご説明ありがとうございます。

どちらにしてもデーモンの再起動（リフレッシュ）が
必要なんですね。

No. 4934 # べた 2008/08/19 (火) 21:28:29

Solaris8 なのですが、シェルを実行する際、
./シェル名としないと起動できません。

「./」で起動するにはどうしたらよいのでしょうか。

「./」で起動できるアカウントがあるので、違いを比べてみると
PATHの変数が異なっていました。

PATH=./:/usr/bin・・・・・
とか
PATH=・・・・/usr/bin:

PATH変数の中に、「./」の設定がある。
PATH変数が「：」で終わっている。

「./」を指定しないと動かないアカウントは、両方がない状況と
なっています。
どのように環境変数を設定すればよいのですか。

No. 4935 # zsh 2008/08/20 (水) 12:07:16

>>4934 べた
> 「./」で起動するにはどうしたらよいのでしょうか。
「./」なしで起動したいということでしょうか？
PATH 環境変数に ./ を含めれば可能ですが、お勧めはしません。
特定のディレクトリにスクリプトを集めて、そのディレクトリを
PATH 環境変数に含める方がよいと思います。

なお、同じ名前のコマンド（スクリプト）が複数のディレクトリに
存在する場合は、PATH 環境変数で先に見つかったコマンド
（左側のパスから順番に探しに行きます）が実行されます。

No. 4936 # 68user 2008/08/21 (木) 02:14:31

>>4934 べた
PATH に . を含めない理由は以下のとおり。

・セキュリティホールとなる。PATH=.:/bin:/usr/bin:/usr/local/bin となっていて、
    cd ~foo; ls としたときに /home/foo/ls が存在したら、そのプログラムを実行
    してしまう。cd /tmp; ls も同様。そのプログラムがどんな悪さをするかはわからない。

・PATH に . を加えると、カレントディレクトリによって実行されるコマンドが異なる
    可能性があるため、説明がめんどくさいし、はまりやすくなる。例えば /bin と
    /usr/bin に同名のコマンドがあるとして、コマンド foo をタイプしたときに、
        - カレントディレクトリが /usr/bin の場合は /usr/bin/foo が実行される
        - カレントディレクトリが /usr/bin 以外の場合は /bin/foo が実行される
    というのはわかりづらい。

・csh・tcsh・bash・zsh など、今どきなシェルを使っている場合は、
        ./
    からタイプした方がファイル名補完を使えるため、入力が速い。

Prev< No. 4836～4936> Next [最新発言に戻る] [過去ログ一覧]