oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Survey JS original import

Browse source
This commit is contained in:
Kaleb Murphy 2008-04-19 18:48:01 +00:00
parent 89eba42f0b
commit 9ce0bd80fd
23 changed files with 3827 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

15
www/extras/wobject/loadTemplate.pl Executable file
View file

@ -0,0 +1,15 @@
#!/usr/bin/perl
use strict;
use DBI;
use File::Slurp;
my $dbh = DBI->connect("DBI:mysql:database=www_norman_com;host=localhost;port=3306", "webgui", "webgui", { RaiseError => 1, AutoCommit => 1 }) or die $!;
my $file = read_file("template.html");
my $sth = $dbh->prepare(qq{ UPDATE template SET template = ?,revisionDate = ? WHERE assetid = ? });
$sth->execute($file, time(),"M3RkJY763xgE1SLYQ4pBqA");
$dbh->disconnect();