This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use lib '/data/WebGUI/lib'; | |
| use warnings; | |
| use strict; | |
| use Time::HiRes qw(usleep); | |
| use WebGUI::Session; | |
| use WebGUI::Asset; | |
| use Devel::Gladiator qw(walk_arena); | |
| use Devel::Size qw(size total_size); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Starting WebGUI 7.9.6 | |
| Loading core.conf | |
| Cycle (1): | |
| $WebGUI::Asset::Snippet::A->{'_session'} => \%WebGUI::Session::B | |
| $WebGUI::Session::B->{'_asset'} => \%WebGUI::Asset::Snippet::A | |
| Cycle (2): | |
| $WebGUI::Asset::Snippet::A->{'_session'} => \%WebGUI::Session::B | |
| $WebGUI::Session::B->{'_db'} => \%WebGUI::SQL::C |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env perl | |
| #------------------------------------------------------------------- | |
| # WebGUI is Copyright 2001-2009 Plain Black Corporation. | |
| #------------------------------------------------------------------- | |
| # Please read the legal notices (docs/legal.txt) and the license | |
| # (docs/license.txt) that came with this distribution before using | |
| # this software. | |
| #------------------------------------------------------------------- | |
| # http://www.plainblack.com [email protected] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| package MyAwesomeCookies; | |
| my %cookies = (); | |
| sub read_cookies { | |
| # .. pass in $query | |
| $cookies{name} = $query->cookie('name'); | |
| } | |
| sub set_cookie { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ./t/POD.t (Wstat: 2048 Tests: 497 Failed: 8) | |
| Failed tests: 234, 237, 323-327, 392 | |
| Non-zero exit status: 8 | |
| ./t/Spectre/Workflow.t (Wstat: 0 Tests: 19 Failed: 0) | |
| TODO passed: 8-19 | |
| ./t/VersionTag.t (Wstat: 512 Tests: 47 Failed: 0) | |
| Non-zero exit status: 2 | |
| Parse errors: Bad plan. You planned 85 tests but ran 47. | |
| ./t/i18n/template.t (Wstat: 256 Tests: 1105 Failed: 1) | |
| Failed test: 491 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| mimi:WebGUI(8-merge) doug$ git push upstream WebGUI8 | |
| error: src refspec WebGUI8 does not match any. | |
| error: failed to push some refs to '[email protected]:plainblack/webgui.git' |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Jul 15 19:30:44 hostname73571 sshd[15492]: pam_unix(sshd:session): session opened for user frank by frank(uid=502) | |
| Jul 15 19:30:44 hostname73571 sshd[15492]: pam_loginuid(sshd:session): set_loginuid failed opening loginuid | |
| Jul 15 19:30:44 hostname73571 sshd[15492]: pam_loginuid(sshd:session): set_loginuid failed |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # As rotations get later, distance gets longer: | |
| # 7 rotations are latest, 6 daily | |
| # 10 rotations are latest, 6 daily and 3 weekly (a full month of coverage) | |
| # 15 rotations are latest, 6 daily, 3 weekly, and 5 monthly (6 full months) | |
| use DateTime; | |
| my $MAX_DAYS = 7; | |
| my $MAX_WEEKS = 4; | |
| sub get_rotation_dates { | |
| my ($dt_today, $num) = @_; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| var makeScopedFormatter = function ( scope, func ) { | |
| return function() { func.apply( scope, arguments ) } | |
| }; | |
| var formatter = makeScopedFormatter( this, this.formatSomething ); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use strict; | |
| use warnings; | |
| use Config::JSON; | |
| for my $file ( @ARGV ) { | |
| my $conf = Config::JSON->new( $file ); | |
| $conf->set('cacheType' => 'WebGUI::Cache::CHI'); | |
| $conf->set('cache' => { |