perl生成乘法表

                                    perl生成乘法表

      在看perl的资料的时候，又看到这个题目
#!/usr/bin/perl
#writen by frankzou

for($i=0;$i<=9;$i++)
   {

       for($j=0;$j<=$i;$j++)
    {
    printf ("$j*$i=".$i*$j.";");
    }
    printf "\n";
}
~