程嶏清单14-3.txt

来自「< linux网络编程工具>>配套源码」· 文本 代码 · 共 9 行

sub new {
my $this = {};
print "\n /* \n ** Created by Cocoa.pm \n ** Use at own risk";
print "\n ** Did this code even get pass the javac compiler? ";
print "\n **/ \n";
bless $this;
return $this;
}