📄 02cr_table.t
字号:
$|++;use strict;use Test;BEGIN { plan tests => 4 }use DBI;unlink("foo");my $dbh = DBI->connect("dbi:SQLite:dbname=foo", "", "");ok($dbh);$dbh->{AutoCommit} = 1;$dbh->do("CREATE TABLE f (f1, f2, f3)");my $sth = $dbh->prepare("SELECT f.f1, f.* FROM f");ok($sth->execute());my $names = $sth->{NAME};ok(@$names == 4);print("# ", join(', ', @$names), "\n");ok($names->[0] eq "f1"); # make sure the "f." is removed$sth->finish;$dbh->disconnect;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -