新しくperlで標準で欲 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このスレッドのURL
■項目テキスト
75:名無しさん@お腹いっぱい。 02/01/17 02:17 あげ 76:469 02/04/21 09:11 コテハンってウザイね。 77:nobodyさん 02/04/21 10:45 mSKVAdKd >>49 %a=(%b,%c); じゃだめか? 78:nobodyさん 02/04/21 16:42 コテハンってウザイね。 79:nobodyさん 02/04/21 16:47 >>78 チャンチャラチャンチャラ (⌒) / (^ @^) - (⊃⊂) ヽ オッカシー (⌒) / (・ @^) - ○( ⊂) ヽ 80:nobodyさん 02/04/21 17:38 #include "perl6.h" #include "perl6/dbi.h" // usage: program perl-expr files int main(int argc, char** argv){ PERL6_MAIN_BEGIN; Perl::SV dbh = Perl::DBI::connect("dbi:foo:bar.db"); Perl::SV sth = dbh->prepare("SELECT * FROM hoge"); sth->execute(); Perl::SV row; while(row = sth->fetchrow_arrayref){ Perl::println(Perl::join(" ", row)); } sth->finish(); dbh->disconnect(); PERL6_MAIN_END; return 0; }
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック!
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
5134日前に更新/33 KB
担当:undef