![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to dbchgk.pm CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Local Repository] / db / prgsrc|
Return to dbchgk.pm CVS log | Up to [Local Repository] / db / prgsrc |
| version 1.10, 2005/07/05 23:58:10 | version 1.11, 2005/12/10 00:03:55 |
|---|---|
| Line 33 my $z; | Line 33 my $z; |
| my $qbase; | my $qbase; |
| BEGIN {do "chgk.cnf"; | BEGIN {do "chgk.cnf"; |
| $qbase = DBI -> connect ("DBI:mysql:$base",'piataev',undef); | $qbase = DBI -> connect ("DBI:mysql:$base",'piataev',undef); |
| $qbase->do("SET NAMES koi8r"); | |
| }; | }; |