perl初心者です。
文字列の中から何番目から何番目までの文字を抜き出して
別のファイルにうつす、
というスクリプトを書いています。
でも、うまくうごいてくれません。。。
恐らく、根本的におかしな部分があると思いますし、
さらに、何番目から、は指定できていても、
次の数字は文字数を意味しているのだと思いますので、
意図するものと違う気がします。
ただ、何番目から何番目
という情報だけを入力してできたら作業上大変助かります。
本当に困っております。
アドバイスをいただけると幸いです。
大変急いでおります(;;)。
宜しくお願いします!!!
#!/usr/bin/perl ;
open(IN, "test.txt") or die ;
open(OUT, ">after_test");
while(<IN>) {
chomp ;
if (/(\S+)/) {
\S = $S
substr ($S, 12345, 12389) = {
print OUT "$_\n";
}
}
}
close (IN) ;
close (OUT) ;
No.1ベストアンサー
- 回答日時:
これでどうでしょう?
12345番目から12389番目まで抜き出してます
#!/usr/bin/perl
my $content = '';
open(IN, "test.txt") or die ;
{
local $/;
$content = <IN>;
}
close (IN);
open(OUT, ">after_test");
print OUT substr ($content, 12345, (12389 -12345 ) );
close (OUT) ;
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- PHP PHPの構文で間違えが分からない 5 2022/07/11 16:38
- PHP SQLとPHPの連結方法がわからないのでアドバイスお願い致します 1 2022/07/12 12:16
- Perl perlについての質問 2 2022/10/17 15:25
- CGI htmlからパラメータで、cgiに渡したい。 1 2023/02/06 16:15
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Perl perlでリテラル値はメモリにどのように格納されているか? 1 2023/01/15 20:45
- その他(プログラミング・Web制作) python質問 1 2023/08/14 11:54
- Visual Basic(VBA) 集めたシートのシート名を変更したい。 下記のコードでサブフォルダにあるファイルのSheet3を集めて 6 2022/08/23 10:38
- Perl Perlのエラーについてご教授ください。初心者です。 CGIを別サーバに移したところ、Perlのバー 5 2023/05/31 10:48
- PHP カラーミーショップのSmartyでの文字列抜き出し 2 2022/05/06 11:51
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
close()で例外が投げられる理由
-
while(<ハンドラ>) {} で行数を...
-
PICでFatFsでオープンした内容...
-
改行コードが勝手に
-
perlのflock関数でロックをかけ...
-
VBAでCSVファイルを途中行まで...
-
バッチファイルの作り方(CSV→...
-
batファイルでrenameができませ...
-
VBAでCSVファイルの特定行を書...
-
openした後、closeしないでプロ...
-
VBAコードを張り付け後のエクセ...
-
ListBoxのデータを高速でファイ...
-
JavaでCSVファイルを高速に読む...
-
至急お願いします。C言語で.img...
-
タブの色を変更する方法
-
vba dir の相対パス
-
RSS自動生成で文字化け
-
perlをwindows環境でshift-jis...
-
awkスクリプトでダブルクォーテ...
-
unixでのファイルロックの方法...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
close()で例外が投げられる理由
-
perlのflock関数でロックをかけ...
-
改行コードが勝手に
-
巨大ファイルの行をを逆順に並...
-
オープンしたファイルで行の連結
-
Perl で syntax error
-
where can I buy snowbord in t...
-
open中のファイルをrename
-
perlを用いた特定文字列間の抽...
-
Perlで他サイトの情報を取得し...
-
die関数のエラー出力先について
-
ハッシュにファイルハンドル
-
サブスクリプトとのファイルハ...
-
テキストファイルの本文中に行...
-
perlで大容量CSVのsort方法につ...
-
フォルダが開かなくなりました。
-
AutoCADのスクリプト
-
ジョブショップスケジューリング
-
バッチファイルの作り方(CSV→...
-
awkスクリプトでダブルクォーテ...
おすすめ情報