Perlでa1,a2,a3 ... を a[1] a[2] a[3]...にする

追記

hyuki氏にPerlでの方法の情報をいただいた。感謝です。m(_　_)m



use strict;
my $x = ”a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a100,a12345”; # すべて変換する

my $y = ”abc1,bca2,aa3,a4a”; # すべて変換しない
$x =~ s/￥ba(￥d+)￥b/a[$1]/g;

$y =~ s/￥ba(￥d+)￥b/a[$1]/g;
print $x, ”￥n”;

print $y, ”￥n”;

ここで、ぶっちゃけ発言なんですが・・・
実は、Perlは、超初心者なのです・・・　私・・・。
ゴメンなさい　(_ _(--;(_ _(--; ペコペコ　2005年は使える言語を増やし技術力高めます。
RSS readerでもチマチマと作りつつ覚えていきます。

Perlで正規表現を使えるように!!!