perl 正则问题求助

[lidawei123]

如何用正则表达式匹配 一个文件LIST中的.c文件，请各位帮忙

[Aylazhang]

use strict;
use warnings;

while (<DATA> ) {
  print if /.*\.c\b/;
}
__DATA__
a.java
a.class
b.c
b.cc
b.cpp
g.pl

[wx红杉树]

/.*\.c\b/i

[lidawei123]

十分感谢，能否讲解一下这个匹配？

另外
__DATA__
a.java
a.class
b.c
b.cc
b.cpp
g.pl


这个是perl 的什么用法，类似于数组？