09/07/19 04:58:33 TalGZSOR
print "Context-Type: text/text";
print "\r";
END{
#表示テンプレートの読み込み
while (getline < count.txt > 0){
txt_file[++i] = $0;
}
close(count.txt);
#あらかじめセットしてあるテンプレート上の文字列を置換
gsub("<!--#count.cgi--!>", new_count, $0);
print $0;
}
47:login:Penguin
09/07/19 11:16:35 xa/YVpR4
>>43
getline知らなかったわ。
難しそうだな・・・
48:login:Penguin
09/07/19 15:13:23 Ge8Nt7Pt
>>44
SSIの仕組みは理解できていますか。
URLﾘﾝｸ(httpd.apache.org)
49:hogehoge
09/07/21 14:50:51 PUGBjRE4
getline は毎回リファレンス見に行ってるなぁ
頭が劣化しとるわー
50:login:Penguin
09/08/01 15:31:08 z6H8O5Sr
こんなものが落ちてたw
URLﾘﾝｸ(mitya.pp.ru)
51:login:Penguin
09/08/15 20:33:21 7GY0b2Yy
Mac OS X Leopard 10.5.8でjgawkを使いたいのです。
ターミナルでawk '{print $0}' filenameですと日本語が悲しいです。
お使いのみなさん、使用法等教えて下さい。
52:login:Penguin
09/08/19 18:02:30 GJ3CGMhT
板違い。
53:login:Penguin
09/08/22 09:19:23 rmix/tng
Mac OS XをUnixとして使ってる人の為のスレ その15
ｽﾚﾘﾝｸ(mac板)
こっちのが詳しいかもね
54:正月前
09/12/29 22:19:45 UAwxD9+5
awk初心者です。
awkにはperlのjoinみたいの関数ありますか？
perl:
print join(":",$_);
55:login:Penguin
09/12/30 01:06:12 Q1gMau4C
データ集計に便利
56:login:Penguin
09/12/30 01:44:22 jMgIWDpO
>>54
BEGIN {OFS=":"}{$1=$1;print}
57:正月前
09/12/31 16:45:37 z/pUNj8p
重複を削除するBASHスクリプトに、perlの部分はawkの連想配列で書き換えたいんですが、splitした後の処理方法が分かりません
教えて頂ければ幸いです。
-----------------------------
hoge='a:b:c:d:a:b:c:d:a'
echo -n $hoge | perl -F: -ane 'chop;foreach(@F){$s{$_}++ or push(@b,$_)}print join(":",@b)'
-----------------------------
58:login:Penguin
10/01/05 11:48:18 iQ1ypvd/
素人なりですけど
echo -n $hoge | awk 'BEGIN{OFS=":"}{n=split($0,a,":");m=1;for(i=1;i<=n;i++){if(!(a[i]in b)){$m=a[i];b[$m]++;m++}}print}'
59:login:Penguin
10/01/05 12:34:43 APedkSZb
echo -n $hoge | awk 'a[$0]++<1{printf(NR>1?RS:_)$0}' RS=:
60:login:Penguin
10/01/05 12:50:31 APedkSZb
a[$0]++<1 じゃなくて
!a[$0]++ とした方が1バイト短くなるな
って、そういう趣旨じゃないか
61:login:Penguin
10/01/08 21:03:31 pPQjxZAI
プログラミングAWK 3度目の復刊
URLﾘﾝｸ(www.fukkan.com)
62:正月前
10/01/11 22:20:00 jx5sxsA2
>>58,59,60
ご回答、誠に有難うございました！
まだawkの部分理解してないけど、期待通りの動作が確認できました！
63:login:Penguin
10/03/16 14:08:38 hRXCRI1I
Linuxじゃないんですが、Gawk on Windowsだと、
gawk '{print $1;}' data.txt
ていうのは、クォーテーションはダブルにしないといけないんですね。。。
64:login:Penguin
10/03/16 14:27:11 OV90ZKd/
うん、引数文字列をどう解釈するかは awk じゃなくてシェルだから。
cmd.exe の仕様の問題であって、awk の側では対応しようにもできない。
65:login:Penguin
10/05/14 13:36:36 XjQaHos9
BEGIN {
printf "２５６倍のコードが提供されてる\n"
printf "URLﾘﾝｸ(books.ascii.jp) にアクセス\n"
printf "本には4756101623なんてのがついてるけど、本の通りに入れるとnot found\n"
}
END {
print "昔と本の内容が変わってるみたいだな"
}
66:login:Penguin
10/05/14 21:49:15 KfNsslph
END {
print "まだ始まってもねーよっ！"
}
BEGIN {
printf "・・・ごめ・・・\n"
}