c405/dojo
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

links and filereadutf8

Browse Source
This commit is contained in:
mynah
2018-08-16 03:18:46 +00:00
parent ca4b987cef
commit 2938f318d8
4 changed files with 20 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/Dojo/Model/Users.pm
View File

@@ -37,7 +37,7 @@ sub _read{
my $dbh = DBI->connect("DBI:mysql:".Dojo::Conf::GRULLADB.":".Dojo::Conf::GRULLADB_H,Dojo::Conf::GRULLADB_UR,Dojo::Conf::GRULLADB_URP,{mysql_enable_utf8 => 1});
return \@empty unless($dbh);
#$dbh->do(qq{SET NAMES 'utf8'});
my $h=$dbh->selectall_arrayref($q,{ Slice => {} },@bind);
my $h=$dbh->selectall_arrayref($q,{ Slice => {} },@bind)//"error";
#((col1=>d1,col2=>d1),(col1=>d2,col2=>d2))
$dbh->disconnect();
return $h;
@@ -47,9 +47,9 @@ sub _read{
sub _write{
my ($q,@bind)=@_;
my (@empty);
my $dbh = DBI->connect("DBI:mysql:".Dojo::Conf::GRULLADB.":".Dojo::Conf::GRULLADB_H,Dojo::Conf::GRULLADB_UW,Dojo::Conf::GRULLADB_UWP);
my $dbh = DBI->connect("DBI:mysql:".Dojo::Conf::GRULLADB.":".Dojo::Conf::GRULLADB_H,Dojo::Conf::GRULLADB_UW,Dojo::Conf::GRULLADB_UWP,{mysql_enable_utf8 => 1});
return 0 unless($dbh);
my $h=$dbh->do($q,{ Slice => {} },@bind);
my $h=$dbh->do($q,{ Slice => {} },@bind)//"error";
$dbh->disconnect();
# log("db write:". $h );
return $h;