Wap58 の回答履歴

linuxコマンドのdf -h を使って ディスク使用量が50%以上のものだけ出力するにはどうしたらいいですか？ df-h | ここからさっぱりわかりません。 至急お願いします。 コマンドの意味も添えてよろしくお願いします。

linuxコマンドのdf -h を使って ディスク使用量が50%以上のものだけ出力するにはどうしたらいいですか？ df-h | ここからさっぱりわかりません。 至急お願いします。 コマンドの意味も添えてよろしくお願いします。

教えてほしいです。 $text = "１テストp41p2Ap2、テストp22、p4テストp2testp4w"; @M = ("p4","p2"); 上記の２つの変数から 下記のようにする方法はありますでしょうか？ $text = "１テストp41p2A、テストp22、p4テストtestw"; ※消したいワード [p4][p2]が複数ある場合 配列内の文字が複数ある場合、最初の一致だけを残しあと消す。 ※[p41][p22]などの２桁の数値は消さない

教えてほしいです。 $text = "１テストp41p2Ap2、テストp22、p4テストp2testp4w"; @M = ("p4","p2"); 上記の２つの変数から 下記のようにする方法はありますでしょうか？ $text = "１テストp41p2A、テストp22、p4テストtestw"; ※消したいワード [p4][p2]が複数ある場合 配列内の文字が複数ある場合、最初の一致だけを残しあと消す。 ※[p41][p22]などの２桁の数値は消さない

教えてほしいです。 $text = "１テストp41p2Ap2、テストp22、p4テストp2testp4w"; @M = ("p4","p2"); 上記の２つの変数から 下記のようにする方法はありますでしょうか？ $text = "１テストp41p2A、テストp22、p4テストtestw"; ※消したいワード [p4][p2]が複数ある場合 配列内の文字が複数ある場合、最初の一致だけを残しあと消す。 ※[p41][p22]などの２桁の数値は消さない

教えてほしいです。 $text = "１テストp41p2Ap2、テストp22、p4テストp2testp4w"; @M = ("p4","p2"); 上記の２つの変数から 下記のようにする方法はありますでしょうか？ $text = "１テストp41p2A、テストp22、p4テストtestw"; ※消したいワード [p4][p2]が複数ある場合 配列内の文字が複数ある場合、最初の一致だけを残しあと消す。 ※[p41][p22]などの２桁の数値は消さない

プログラムに関して、綺麗なコードを書くコツはありますか？ それとコードを書く際に気を付けている事はありますか？

恐れ入ります。 Perlで、配列がカンマで区切られたデータを読み込み、 その先頭行にデータを挿入したいのですが、 中々うまくいきません。 データ（/data/xxx.txt）の中身は、 test,test2 bbb,bbb2 ccc,ccc2 という感じで、カンマで区切られて改行で並んでいます。 そこに新たに$dateと$contで受けたデータを先頭行に追加する感じです。 open(FILE,"<./data/xxx.txt"); while($temp = <FILE>){ @temp=split(/,/,$temp); push(@ddr,"$temp[0]","$temp[1]"); } seek(@ddr,0,0); unshift(@ddr,($date,$cont."\n")); open(FILE,">./data/xxx.txt"); $new=join(",",@ddr); print FILE $new; close(FILE); このように書いていますが、 print FILE @ddr とすると、配列が壊れた状態（全て繋がる）で先頭行には挿入されたのですが、カンマで区切って配列にして並べようとしたら、 test,test2 ,bbb,bbb2, ,,ccc,ccc2,, という感じで上手く並びません。 よろしくおねがいします。

恐れ入ります。 Perlで、配列がカンマで区切られたデータを読み込み、 その先頭行にデータを挿入したいのですが、 中々うまくいきません。 データ（/data/xxx.txt）の中身は、 test,test2 bbb,bbb2 ccc,ccc2 という感じで、カンマで区切られて改行で並んでいます。 そこに新たに$dateと$contで受けたデータを先頭行に追加する感じです。 open(FILE,"<./data/xxx.txt"); while($temp = <FILE>){ @temp=split(/,/,$temp); push(@ddr,"$temp[0]","$temp[1]"); } seek(@ddr,0,0); unshift(@ddr,($date,$cont."\n")); open(FILE,">./data/xxx.txt"); $new=join(",",@ddr); print FILE $new; close(FILE); このように書いていますが、 print FILE @ddr とすると、配列が壊れた状態（全て繋がる）で先頭行には挿入されたのですが、カンマで区切って配列にして並べようとしたら、 test,test2 ,bbb,bbb2, ,,ccc,ccc2,, という感じで上手く並びません。 よろしくおねがいします。

ご覧になっていただきありがとうございます。 初心者が手を出すなと言われても仕方のない質問ではありますが、お分かりの方いらっしゃいましたら是非ご回答いただければと思います。 表題の通りAmazonのAWSを使いpython3　で動くソースコードがあり追加しないといけないものが何点かあるようです。 websocket json pandas datetime time pybitflyer collections このうち下記のもの以外は追加できたと認識しております。 json time collections 問題ないと思われるのは下記の３つ ec2-user:~/environment $ sudo pip install websocket ec2-user:~/environment $ sudo pip install pandas ec2-user:~/environment $ sudo pip install datetime　　と入力しましたらメーターの様なものがでてきて１００％と表示されたので問題ないかと思ってます。 pybitflyerは下記のようなメッセージがでました。 ec2-user:~/environment $ sudo pip install pybitflyer Collecting pybitflyer Downloading https://files.pythonhosted.org/packages/12/e8/795b8b7603ea439312b95c95891a9f1a65c4c49296ce2f7ac2a79ebe5564/pybitflyer-0.1.9.tar.gz Requirement already satisfied: requests in /usr/local/lib/python3.6/site-packages (from pybitflyer) Requirement already satisfied: urllib3<1.24,>=1.21.1 in /usr/local/lib/python3.6/site-packages (from requests->pybitflyer) Requirement already satisfied: chardet<3.1.0,>=3.0.2 in /usr/local/lib/python3.6/site-packages (from requests->pybitflyer) Requirement already satisfied: certifi>=2017.4.17 in /usr/local/lib/python3.6/site-packages (from requests->pybitflyer) Requirement already satisfied: idna<2.8,>=2.5 in /usr/local/lib/python3.6/site-packages (from requests->pybitflyer) Installing collected packages: pybitflyer Running setup.py install for pybitflyer ... done Successfully installed pybitflyer-0.1.9 You are using pip version 9.0.3, however version 18.0 is available. You should consider upgrading via the 'pip install --upgrade pip' command. 本当に申し訳ないのですが、ライブラリの追加コマンドをお教えいただけませんでしょうか？ 皆様、宜しくお願い致します。

現在約111円ですがこの理由をわかりやすくご説明ください。 またいつごろ円高になるかの予想並びにその理由も併せてお願いします。

ポイントカードって消費者にとって得なのですか？ 「近所にそこしか店がなく、100％そこでしか買い物しない」と決めてる場合は得なんでしょうけど、近所に選択肢がいくつもある場合は損になる時が多くないですか？ ポイントカードの有無で店を決めると損な買い物になる場合があるし、ポイントカードを無視すればポイントがバラけていつまでも溜まらないまま失効するし。

私は３９年間飲食店を営んでいます、約２０年程前から税務を計理士に依頼して来ました。その間妻に給与、その時点では妻を税務署に申請、しかし約９年前妻が亡くなり、娘が仕事に従事。妻に支給していた金額を娘に支給しました。その時点で本来なら計理士の方で名前の変更の手続き私に指導するべきでは。勿論経理士は妻の死亡知っています。その後９年間の内３年ほど前から過去のような仕事量が不可能になり 営業縮小に切り替え過去の売上の半分程になり　経理士を解除し自分で税務署に直接指導で申告するようになり、３年経ちました。そして２９年度分の申告時 税務署から「人件費として約１００万円払っていた経費が認められない」 その訳は「支給されてきた妻の名で娘さんの名に申請されていない」とのこと そこで私が「それでは過去９年前から過少申告に当るのか」と尋ねたところ 当方でも{税務署）見落としでミスが有ったと、過去にさかのぼることはしない これは経理士のするべき届けをしなかった結果こうしたミスが発生したものと 私のミスは無かった、ただ申し訳ないが泣いてくださいと。説得されました おかげで所得税、市税　健康保険など全て昨年の納税額より２倍半以上の 納税になります。泣くしかありませんか。

下記のサイトで http://www.isl.ne.jp/pcsp/beginC/C_Language_14.html 例えば、例題4で　武田信玄の"武"だけを取得するやり方はありますか？ イメージとしては２行目の２個目とか３個目の文字を取得するという意味です。 ポインタを使えばできそうな気がしますがどのように行ってよいかわっからないです。 宜しくお願いしんす。

下記のサイトに構造体のことが書かれています。 http://www.isl.ne.jp/pcsp/beginC/C_Language_14.html その中の　(3)構造体の初期化　の記述で 　//構造体の型宣言 　struct student{ 　 int no; // 学籍番号 　 char name[256]; // 氏名 　 int year; // 学年 　 char student_class[256]; // クラス 　}; と書かれています。 次の(4)構造体のデータ参照では、 　//構造体の型宣言 　struct OLD{ 　 int no; //番号 　 char *name; //名前 　 int s_year; //年 　 char s_class; //クラス 　}; と書かれています。 ここで質問です。 前者の名前は　char name[256]　ですが、 後者の名前は　char *name　になっています。 name[256]　と　*name　では何が違うのでしょうか？ どういうときに使い分けるのでしょうか？

今は会社員ですが後2年で定年します。今年の5月に1基目の太陽光発電の売電を開始します。10月ごろに2基めの売電を開始する予定です。青色申告の手続きはするつもりです。太陽光だけなので確定申告は自分でやりたいのですが今勉強しているソフトはエクセル簿記といってわりと簡単なものです。1基だけならわかるのですが2基目の場合は別々にうちこむのでしょうか。

Perlのデバック中に今いるディレクトリを知りたい場合、一旦プログラムを終了して今いるディレクトリを書き出すコードを追加する以外に方法は無いでしょうか。 それだとディレクトリが移動しそうな場所すべてにコードを追加しないといけないので、結構面倒だと思います。 一番教えて欲しいのはデバッカー内で常に今いるディレクトリを教えてくれる変数のような類です。それができない場合、デバックから抜けることなく今いるディレクトリを知るコマンドのような類は無いでしょうか。 デバッカーとしては、Perlに標準のものの他に、Active Perl のPDKも持っています。

Perlのデバック中に今いるディレクトリを知りたい場合、一旦プログラムを終了して今いるディレクトリを書き出すコードを追加する以外に方法は無いでしょうか。 それだとディレクトリが移動しそうな場所すべてにコードを追加しないといけないので、結構面倒だと思います。 一番教えて欲しいのはデバッカー内で常に今いるディレクトリを教えてくれる変数のような類です。それができない場合、デバックから抜けることなく今いるディレクトリを知るコマンドのような類は無いでしょうか。 デバッカーとしては、Perlに標準のものの他に、Active Perl のPDKも持っています。

Perlのデバック中に今いるディレクトリを知りたい場合、一旦プログラムを終了して今いるディレクトリを書き出すコードを追加する以外に方法は無いでしょうか。 それだとディレクトリが移動しそうな場所すべてにコードを追加しないといけないので、結構面倒だと思います。 一番教えて欲しいのはデバッカー内で常に今いるディレクトリを教えてくれる変数のような類です。それができない場合、デバックから抜けることなく今いるディレクトリを知るコマンドのような類は無いでしょうか。 デバッカーとしては、Perlに標準のものの他に、Active Perl のPDKも持っています。

あるサイトの情報を取得するのに ソースを組んで、なんとかできたのですが、 時間がかかってる気がします。 ページ数　約300ページくらい読み込んでいて その中でも、 250ページほど、正規表現で、一部抜粋し、保存させているのですが、 ここが遅いです。 保存した容量は、 1個につき2kb～20kb 平均8kbほど 下記のような、ソースの箇所が明らかに遅い気がします。 my @words; while ($content =~ m#<td.*?>(.+?)</td>#gs) { my $word = $1; $word =~ s/<.+?>//g; $word =~ s/(\r|\n)+/\,/g; $word =~ s/,+//g; for( my $year=2010; $year<2017; $year++ ){ $word =~ s/$year\//\n$year\//g; } from_to($word,"euc-jp","utf8"); utf8::decode($word); push(@words, $word) if $word; } @Word = join(',', @words) . "\n"; print @Word; open(FILE, ">","$DATA[$i].txt") or die("error :$!"); flock(FILE, 2); print FILE @Word; close FILE; 内容が多いからでしょうか？ だいたい10分近くかかっております。 パソコンもcore i3と古い Windows7を使用しています。 そんなものでしょうか？ もしくは、速くする方法はありますか？