Example.pm

package Company::Task::Example;
# ABSTRACT: Example task class using moose

sub perform {
    my $job = shift;
    Company::Task::Example::Run->new( job => $job, %{$job->args->[0]} )->run;
}

package Company::Task::Example:Run;
use Moose;
with 'Company::Task::Role::ResqueJob'; # this provides job related attrs, like access to resque and redis :-)
with 'Company::Task::Role::Config';

has url        => ( is => 'ro', required => 1 );
has first_seen => ( is => 'ro', lazy => 1, default => sub{time} );

sub run {
    my $self = shift;

    if ( $self->first_seen < time-3600 ) {
        $self->do_something_with_url; 
    }
    else {
        $self->requeue_job;
    }
}

#...

1;