#Resource:

sub fetch_resource {
    my $self = shift;
    my ($job) = @_;

    return undef;    # Resource not yet available

    return 0; # Resource not necessary

    # Resource
    return {
        env  => {...},
        args => [...],

        ...,
    };
}

sub assign_resource {
    my $self = shift;
    my ($pid, $res) = @_;

    ...;

    return;    # Ignored
}

sub release_resource {
    my $self = shift;
    my ($pid) = @_;

    ...;

    return;    #ignored
}
