:(用了几年perl也没理解最简单的东西

之前还碰到性能巨差的问题

今天碰到很简单的问题

my $re = 'InnoDB free: 1689600 kB';

if ($re =~ /(d*)/) {
print $1;

}

我以为上边可以返回那个数字呢，但返回的是空

不过得到一个不错的地址http://www.aka.org.cn/Lectures/index.html和一本不错的数perl的8大原则

Too Good!