テキスト ファイルからデータを抽出し、別のテキスト ファイルとして保存する Perl スクリプトが必要です。テキスト ファイルの各行には、「http://pics1.riyaj.com/thumbs/000/082/104//small.jpg」のような jpg への URL が含まれています。スクリプトで、各 jpg URL の最後の 6 つの数字 (つまり 082104) を変数に抽出する必要があります。新しいテキストの各行の別の場所に変数を追加したい。
入力テキスト：
text http://pics1.riyaj.com/thumbs/000/082/104/small.jpg text
text http://pics1.riyaj.com/thumbs/000/569/315/small.jpg text
出力テキスト:
text php?id=82104 text
text php?id=569315 text
ありがとう