Blame | Last modification | View Log | RSS feed
#!/usr/bin/perluse strict;use cPanelUserConfig;use RollerCon;use DBI;use WebDB;my $dbh = WebDB::connect;$dbh->do ("update setting set value = ? where setting.key = ?", undef, 2, "MAX_SHIFT_SIGNUP_PER_DAY_OFF");#$dbh->do ("update setting set value = ? where setting.key = ?", undef, 1, "MAX_FULL_LENGTH_SIGNUP_OFF");$dbh->do ("update setting set value = ? where setting.key = ?", undef, 2, "MAX_SHIFT_SIGNUP_PER_DAY_ANN");#$dbh->do ("update setting set value = ? where setting.key = ?", undef, 1, "MAX_FULL_LENGTH_SIGNUP_ANN");