2つの数字が異なるのはなぜですか？ #!/usr/bin/env perl
use warnings;
use 5.10.1;
my $sep = '';
my $number = 110110110110111;
$number =~ s/(\d)(?=(?:\d{3})+\b)/$1$sep/g;
say "A: <$number>";
$number =~ s/\Q$se
いくつかの大きなテキストファイルで条件付き置換を実行したいとします。構造体は値「DATA」が10列（それは常に発生しません）に存在する場合、私は、やりたい 1 ad sd bg we we A.2 890 3434 DATA
2 gf nh ok wa we A.1 890 3434 DATA
3 gf nh ok wa we A.1 890 3434
...
...
で、第七列の要素
私はstring1のは、それが剥離している行うに $Item1="I Like Coffee";
$Item2="2 I Like Coffee";
$Item3="I like Milke";
$Item1=$Item2 but $Item1!=$item3
一つの方法は、perlでstring2の中にあるかどうかを確認しようとしています$ item2の始めに2を出してから比較してく
Perlは、インラインでの検索と置換のための正規表現を全面的にサポートしています。 Javaモジュールのようなものは何ですか？ Jakarta Regexpプロジェクトがありましたが、それは氷上にあります。 Perl5UtilがPerl5Compilerを呼び出していたOROと同じです。他に何かがあるかどうか疑問に思ってテストしていません....
私は約How to take in text/character argument without quotesの前に質問しました。私がその質問で提供したシナリオでは、引数の数は固定されているので、関数定義で使用するeval（substitute（））の数は、引数の数に相当します。 今私は（下記参照）の例factorsため私は1つの引数を持つシナリオを持って、ユーザーが自分の周りの引用符を使用せず