use PBS::Client;
    
    # Create a client object linked to a server
    my $client = PBS::Client->new;
    
    # Describe the job
    my $job = PBS::Client::Job->new(
        %job_options,           # e.g. queue => 'queue_1', mem => '800mb'
        cmd => \@commands
    );
    
    # Optionally, re-organize the commands to a number of queues
    $job->pack(numQ => $numQ);
    
    # Submit job
    $client->qsub($job);