- 論壇徽章:
- 0
|
我在網(wǎng)上下載了某在線商店的源碼,但是一開始就看不太明白,我太菜了!
--------------------------------------------------------------------------------------------
use FindBin qw($Bin);
use lib "$Bin/library";
use iLcatlib;
use strict;
use vars qw(%FORM %CON %COOKIE $LIB $sth $row @userdata);
#獲得系統(tǒng)參數(shù)
tie %CON, 'IniFiles', ( -file => "$Bin/nkshop.ini" );
#構(gòu)造新對(duì)象
$LIB=iLcatlib->new(ttmlpath=>"$CON{path}{ttmlpath}");
---------------------------------------------------------------------------------------------------
中的"use vars qw(%FORM %CON %COOKIE $LIB $sth $row @userdata);"
和“
#獲得系統(tǒng)參數(shù)
tie %CON, 'IniFiles', ( -file => "$Bin/nkshop.ini" );
#構(gòu)造新對(duì)象
$LIB=iLcatlib->new(ttmlpath=>"$CON{path}{ttmlpath}");
”
構(gòu)造新對(duì)象是怎么樣構(gòu)造的,有沒有哪位朋友給一下這方面的詳細(xì)解釋。 |
|