# 函式多返回值
$v1 = 'abc';
$v2 = 'bcd';
($v3, $v4) = upcase($v1, $v2);
sub upcase
return wantarray ? @parms : $parms[0];
}print $v3, $v4;
# 取得陣列長度
@a=(1, 2, 3);
my $alen = @a;
print $alen;
@aa = ([1,"111"], [2, '2222'], [3, '3333'], [4, '4444']);
my $aalen = @aa;
print $aalen;
#遍歷陣列
my @key_words = (
'泰迪',
'哈士奇',
'德牧'
);foreach my $v (@key_words)
# 操作mysql
use dbi;
my $dsn = "dbi:mysql:database=db1;host=localhost";
my $user = 'root';
my $password = 'mypassword';
$dbh = dbi->connect($dsn,$user,$password); #連線資料庫
$dbh->do("set names gbk");
my ($dbh,$sth,@ary);
$dbh->do("update test set f1 = 1"); # 修改
$sth = $dbh->prepare("select f1,f2,f3 from test"); #查詢
$sth->execute();
while(my(@row) = $sth->fetchrow_array());#取記錄到變數}
$sth->finish;
$dbh->disconnect;
# 建立模組bankaccount.pm, 內容如下:
package bankaccount;
use exporter;
@isa=('exporter');
@export_ok = ( 'deposit');
$total = 0;
sub deposit
return 1;
# 使用模組bankaccount
use bankaccount;
bankaccount::deposit(10);
print $bankaccount::total;
# 操作文字檔案
open txt,">c:/a.txt";
print txt "test...\n";
close txt;
Linux 知識點滴
linux的原作者是誰?linus torvalds,托瓦茲.作業系統應該包括哪兩個部分?乙個是 核心與其提供的介面工具 另乙個是 利用核心提供的介面工具所開發出來的軟體 linux的發展分為兩種版本,哪兩種?穩定版本的偶數版,如2.6.x,適合與商業與家用環境使用 發展中版本的奇數版,適合開發特殊...
C 多型知識點滴
函式的多種不同的實現方式即為多型 在繼承中,有時候基類的一些函式在派生類中也是有用的,但是功能不夠全或者兩者的功能實現方式就是不一樣的,這個時候就希望過載那個基類的函式,但是為了不再呼叫這個函式時,出現不知道呼叫基類的還是子類的情況出現,於是就提出了多型。多型可以說是面象物件語言的強大原因之一。多型...
Objective C知識點滴記錄
1 方法呼叫基本語法 object method object methodwithinput input 方法可以有返回值 output object methodwithoutput output object methodwithinputandoutput input 還可以呼叫累方法 id...