perl 小練習

!/usr/bin/perl $subject={         math=>{                 "mahong"=>90,                 "mahao"=>98,                 "zhangwei"=>89,                 "yawei"=>98         },         chinese=>{          

>>阅读原文<<