$HoA{flintstones}[0] = "Fred";
# another element
$HoA{simpsons}[1] =~ s/(\w)/\u$1/;
# print the whole thing
print "\n";
foreach $family ( keys %HoA ) {
print "$family: @{ $HoA{$family} }\n"
}
想请问红色部分的意思 perl 可以令变量=regular expression吗?

zz=~s/xx/yy/ 是把变量zz内容符合xx的部分取代成yyhttp://0rz.tw/dODRI