Gist


  
      gist: 221171
      
    
      Wed Oct 28 22:10:04 -0700 2009
      
    
1
2
3

      
                                  #!/usr/bin/perl
use strict;
use warnings;
              
    
      gist: 220449
      
    
      Wed Oct 28 05:28:05 -0700 2009
      
    
1
2
3

      
                                  #!/usr/bin/perl
use strict;
use warnings;
              
    
      gist: 215491
      
    
      Wed Oct 21 14:42:12 -0700 2009
      
    
1
2
3

      
                                  #!/usr/bin/perl 
 
use strict;
              
    
      gist: 214645
      
    
      Tue Oct 20 14:45:57 -0700 2009
      
    
1
2
3

      
                                 #!/usr/bin/perl 
 
use strict;
              
    
      gist: 214214
      
    
      Tue Oct 20 05:15:44 -0700 2009
      
    
1
2
3

      
                                  # Form.tt 
<!-- the 'form' wrapper is a hookable printer that by default just stuffs in the form, and where the form is going to -->
[% WRAPPER form %] 
              
    
      gist: 213352
      
    
      Mon Oct 19 06:21:39 -0700 2009
      
    
1
2
3

      
                                  package WMDs;
 
 
      gist: 213339
      Carp::Always makes backtrac...
    
    
      Mon Oct 19 05:58:11 -0700 2009
      
    
1
2
3

      
                                  package Foo;
 
use utf8;
              
    
      gist: 213318
      
    
      Mon Oct 19 05:08:55 -0700 2009
      
    
1
2
3

      
                                  perl -MDevel::SimpleTrace script/foo_server.pl
syntax error at /home/kent/perl/git/foo-backend/script/../lib/Foo/Controller/Bar.pm line 111, near ")
 
              
      gist: 212780
      
    
      Sun Oct 18 11:06:38 -0700 2009
      
    
1
2
3

      
                                  Whirlpool: 
left ne right, but no input has been added
left: 19fa61d75522a4669b44e39c1d2e1726c530232130d407f89afee0964997f7a73e83be698b288febcf88e3e03c4f0757ea8964e59b63d93708b138cc42a66eb3
              
    
      gist: 207648
      
    
      Sun Oct 11 05:24:48 -0700 2009
      
    
1
2
3

      
                                  #!/usr/bin/perl
use strict;
use warnings;
              
    
      gist: 207643
      
    
      Sun Oct 11 04:54:53 -0700 2009
      
    
1
2
3

      
                                  sub test :Local :Args(0) {
    my ( $self, $c ) = @_;
 
              
      gist: 183614
      
    
      Wed Sep 09 02:41:35 -0700 2009
      
    
1
2
3

      
                                 make coverage
$WEBBROWSER cover_db/TestCase-pm.html
 
              
      gist: 183045
      
    
      Tue Sep 08 09:14:38 -0700 2009
      
    
1
2
3

      
                                  package My::Module;
use strict;
use warnings;
              
    
      gist: 181658
      
    
      Sat Sep 05 22:22:13 -0700 2009
      
    
1
2
3

      
                                  This is the full path to your currently selected profile:
 
 
      gist: 179732
      
    
      Wed Sep 02 07:04:19 -0700 2009
      
    
1
2
3

      
                                  make -j3 test TEST_VERBOSE=1
PERL_DL_NONLAZY=1 /usr/bin/perl5.10.1 "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t
===(       1;0  1/1  0/?   0/41 )=======================================ok
              
    
      gist: 179714
      
    
      Wed Sep 02 06:33:03 -0700 2009
      
    
1
2
3

      
                                  ../lib/CGI/t/carp.t .............................................. ok   
../lib/CGI/t/cookie.t ............................................ ok   
===(   87863;258   66/194  34/58  1/7 )=================================
              
    
      gist: 176671
      sets-portage>paludis
    
    
      Thu Aug 27 17:08:16 -0700 2009
      
    
1
2
3

      
                                  #!/usr/bin/perl 
# (C)Kent Fredric 2008,2009
# Use Freely, No Warranty.
              
    
      gist: 173920
      
    
      Mon Aug 24 08:02:34 -0700 2009
      
    
1
2
3

      
                                  CatalystX::Declare::Controller::ActionPreparation->create_action(
  attributes => { ActionClass => ["Catalyst::Action::Serialize"] },
  class => "My::Controller::User",
              
    
      gist: 140261
      
    
      Fri Jul 03 11:53:16 -0700 2009
      
    
1
2
3

      
                                  #!/usr/bin/perl 
use strict;
use warnings;
              
    
      gist: 127406
      
    
      Wed Jun 10 11:34:44 -0700 2009
      
    
1
2
3

      
                                  urxvt*reverseVideo: true
urxvt*jumpScroll: true
urxvt*skipScroll: true