__awa__のプロフィール

あるデータファイル中に以下のようなデータがあります。 >1234 adjaiubgubmcauouamaouagamouaucamougauyouajmouaguau zadaaboueroauahcaoqqpeuaoqueiiulgjaogahiapnnfaugao ・ ・ >1235 ajfaoufaobayanfaggsofudjjmlacxaoueytiaulmfglaguaou agaohghmfjghucpoepppppfagaaewetfhafhdaugyaiygyaygi ・ ・ >1236 ・ ・ 「>・・」はそれ以下の文字列のIDをあらわしています。各文字列はそれぞれIDを持っています。IDごとに30文字の文字列を（ランダムに）ｘ回抽出するプログラムを教えてください。考えているうちにぜんぜんわからなくなりました。取得した文字列は元のデータファイル中に以下のように上書きをしたいです。「>」以下にはその文字列を取得したIDとそのID内のデータの何行目から何行目までのデータを取得したかを表す タグがほしいです。そのような仕様の文字列取得作業を全部でランダムにX回したいと考えております。以下の実行例のように取得する文字列は一部かぶってもぜんぜん結構です。 昨日から考えていますが、限界に来ました。 長い説明になって申し訳ございませんが、よろしくお願いします。 ≪元のデータファイルに上書きされた実行例≫ >1234from1to30 adjaiubgubmcauouamaouagamouauc >1236from51to81 aijewqmikfugpoirexcxgragukgewj >1235from47to77 guauzadaaboueroauahcaoqqpeuaoq ・ ・

あるデータファイル中に以下のようなデータがあります。 >1234 adjaiubgubmcauouamaouagamouaucamougauyouajmouaguau zadaaboueroauahcaoqqpeuaoqueiiulgjaogahiapnnfaugao ・ ・ >1235 ajfaoufaobayanfaggsofudjjmlacxaoueytiaulmfglaguaou agaohghmfjghucpoepppppfagaaewetfhafhdaugyaiygyaygi ・ ・ >1236 ・ ・ 「>・・」はそれ以下の文字列のIDをあらわしています。各文字列はそれぞれIDを持っています。IDごとに30文字の文字列を（ランダムに）ｘ回抽出するプログラムを教えてください。考えているうちにぜんぜんわからなくなりました。取得した文字列は元のデータファイル中に以下のように上書きをしたいです。「>」以下にはその文字列を取得したIDとそのID内のデータの何行目から何行目までのデータを取得したかを表す タグがほしいです。そのような仕様の文字列取得作業を全部でランダムにX回したいと考えております。以下の実行例のように取得する文字列は一部かぶってもぜんぜん結構です。 昨日から考えていますが、限界に来ました。 長い説明になって申し訳ございませんが、よろしくお願いします。 ≪元のデータファイルに上書きされた実行例≫ >1234from1to30 adjaiubgubmcauouamaouagamouauc >1236from51to81 aijewqmikfugpoirexcxgragukgewj >1235from47to77 guauzadaaboueroauahcaoqqpeuaoq ・ ・

別サーバーのファイルを以下のようにすると、読み込みは可能となりました。 このファイルに書き込むロジックを調べているのですが、 中々見つかりません。 どのようにすれば、書き込む事が出来るのでしょうか。 $url = "http://www.test.jp/test.dat"; require LWP::UserAgent; $ua = new LWP::UserAgent; $request = new HTTP::Request('GET', $url); $response = $ua->request($request); if ($response->is_success) { $content = $response->content; } @DATA = $content;

最近、perlを独学で勉強し始めたものです。 １行で複数回データの入力を行いたいのですが、データを入力するたびに改行されてしまいます。 今は$変数=<STDIN>としているのですが、STDINで取得したデータには\nが含まれているようなので、chompを使うのかと考えているのですがどうしたらいいのか分かりません。それとも何か別の方法があるのでしょうか？

最近、perlを独学で勉強し始めたものです。 １行で複数回データの入力を行いたいのですが、データを入力するたびに改行されてしまいます。 今は$変数=<STDIN>としているのですが、STDINで取得したデータには\nが含まれているようなので、chompを使うのかと考えているのですがどうしたらいいのか分かりません。それとも何か別の方法があるのでしょうか？