$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