repo.or.cz
/
gruta.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Get only story's fields() and not afields() in bin/gruta.
[gruta.git]
/
examples
/
create.pl
blob
9194df3c47d9453ba41b27e80a2e8a6d450b50e8
1
#!/usr/bin/perl
2
3
use
Gruta
::
Source
::
DBI
;
4
5
my
$src
=
Gruta
::
Source
::
DBI
->
new
(
6
string
=>
"dbi:SQLite:test.db"
,
7
);
8
9
$src
->
create
();