Skip to content

Instantly share code, notes, and snippets.

@masartz
masartz / php_cron_test.php
Last active August 29, 2015 14:13
php_cron_test
<?php
/**
* Test_Crontab
*
*/
require 'vendor/autoload.php';
class Test_Batch_Crontab extends PHPUnit_Framework_TestCase
@masartz
masartz / php_syntax_check.php
Created February 3, 2015 02:48
php syntax check test
<?php
/**
* Test_PHP_Syntax
*
* @group App
* @uses TestCase
*
*/
class SyntaxTest extends PHPUnit_Framework_TestCase
@masartz
masartz / perl_useok_test.pl
Created February 3, 2015 02:50
perl module use_ok test
#!/usr/bin/env perl
use strict;
use warnings;
use File::Find;
use Test::More;
my @TARGET_DIR = (qw/ lib /);
drop table if exists varchar_length;
create table varchar_length(
id int auto_increment NOT NULL,
letter016 varchar(16),
letter256 varchar(256),
primary key(id)
);
drop table if exists int_length;
create table int_length(
#!/usr/bin/perl
use strict;
use warnings;
use lib './lib';
package MyApp::Worker::Test;
use base qw/Qudo::Worker/;
use Data::Dumper;
#!/usr/bin/perl
use strict;
use warnings;
my $str = 'gist-test';
print $str."\n";
exit;
#!/usr/bin/perl
use strict;
use warnings;
use Qudo;
use MyApp::Worker::Santa;
my $qudo = Qudo->new(
driver_class => 'Skinny',
databases => [+{
#!/usr/bin/perl
use strict;
use warnings;
use Qudo;
my $qudo = Qudo->new(
driver_class => 'Skinny',
databases => [+{
dsn => 'dbi:mysql:qudo',
package MyApp::Worker::Santa;
use strict;
use warnings;
use base qw/Qudo::Worker/;
sub work {
my ($self , $job ) = @_;
$job->manager->plugin->{pre_message}->();
@masartz
masartz / gist:630120
Created October 16, 2010 18:27
YAPC::Asia2010 Qudo::Hook::ForceQuitJob demo script
#!/usr/bin/perl
use strict;
use warnings;
use Qudo;
my $qudo = Qudo->new(
driver_class => 'Skinny',
databases => [+{
dsn => 'dbi:mysql:qudo',