tag:blogger.com,1999:blog-4845599329221136551.post6931661471574626072..comments2023-10-18T21:50:45.395+08:00Comments on 程式語言教學誌 FB, YouTube: PYDOING: Perl 入門指南 - new 方法Kaiching Changhttp://www.blogger.com/profile/10096342137342970684noreply@blogger.comBlogger3125tag:blogger.com,1999:blog-4845599329221136551.post-11791965584891798272015-12-04T09:13:13.672+08:002015-12-04T09:13:13.672+08:00已修改錯誤,感謝指正 ^_^已修改錯誤,感謝指正 ^_^Kaiching Changhttps://www.blogger.com/profile/10096342137342970684noreply@blogger.comtag:blogger.com,1999:blog-4845599329221136551.post-84902147640722209902015-12-02T14:37:00.821+08:002015-12-02T14:37:00.821+08:00承上篇留言
my $c = $e-getCode();
要改成
my $c = $e->ge...承上篇留言<br />my $c = $e-getCode();<br /><br />要改成<br />my $c = $e->getcode();<br /><br />Anonymoushttps://www.blogger.com/profile/17219546780146735431noreply@blogger.comtag:blogger.com,1999:blog-4845599329221136551.post-10613943886949636322015-10-09T00:03:44.847+08:002015-10-09T00:03:44.847+08:00謝謝你提供這麼好的學習
不過在這邊文章中發現了程式碼有些問題
請問是否在sub new裡的
12...謝謝你提供這麼好的學習<br /><br />不過在這邊文章中發現了程式碼有些問題<br /><br />請問是否在sub new裡的<br />12 行alph=< shift, 應改成 alph=>shift,<br />13 行code =< shift, 應改成 code=>shift,<br />15 行$self-<{alph} = join("", ("a" .. "z")); 應改成 $self->{alph} = join("", ("a" .. "z"));<br />16 行$self-<{code} = join("", shuffle(("a" .. &Anonymoushttps://www.blogger.com/profile/08179632649842913287noreply@blogger.com