摘要：
晚上仔细的推敲了下大骆驼的案例，由于有段时间没继续看下去了，导致有些地方忘记了。今天仔细的翻了下面对对象那块，说实话，认真看，用心看的话，就能看明白它写神码。看完前面一堆的理论，发现一个特点，它简单轻便的解释了OOP是啥玩意，跟着上CU搜了些案例，发出一段来，并加上注释，希望全世界都能看懂。。。#!/usr/bin/perl -wpackage person;use strict;sub new { #创建一个散列，用来存放数据。 my $self = {}; #获取数据并放入散列中 $self->{"name"} = shift... 阅读全文