logo
down
shadow

Parsing AutoSys JIL with perl


Parsing AutoSys JIL with perl

By : jen.hol
Date : November 22 2020, 03:01 PM
may help you . As I've said in my comment, please format your code sensibly. Without doing so you will get people either ignoring your question, or being grumpy about answering like me
code :
#!/foo/bar/perl5/core/5.10/exec/bin/perl

use strict;
use warnings 'all';

my $data = do {
    local $/;
    <DATA>;
};

my @data = grep /:/, split /^(?=insert_job)/m, $data;

for ( @data ) {

    my %data = /(\w+) \s* : \s* (?| " ( [^""]+ ) " | (\S+) )/gx;

    next unless $data{job_type} eq 'CMD';

    print "@data{qw/ insert_job machine command /}\n";
}


__DATA__
/* ----------------- COME_AND_PLAY_WITH_US_DANNY ----------------- */

insert_job: COME_AND_PLAY_WITH_US_DANNY   job_type: CMD
command: /bin/bash -ls
machine: capser.com
owner: twins
permission: foo,foo
date_conditions: 1
days_of_week: mo,tu,we,th,fr
start_times: "04:00"
description: "Forever, and ever and ever"
std_in_file: "/home/room217"
std_out_file: "${CASPERSYSLOG}/room217.out"
std_err_file: "${CASPERSYSLOG}/room217.err
alarm_if_fail: 1
profile: "/autosys_profile"
timezone: US/Eastern

/* ----------------- COME_AND_PLAY_WITH_US_AGAIN_DANNY ----------------- */

insert_job: COME_AND_PLAY_WITH_US_AGAIN_DANNY   job_type: CMD
command: /bin/bash -ls
machine: capser.com
owner: twins
permission: foo,foo
date_conditions: 1
days_of_week: mo,tu,we,th,fr
start_times: "04:00"
description: "Forever, and ever and ever"
std_in_file: "/home/room217"
std_out_file: "${CASPERSYSLOG}/room217.out"
std_err_file: "${CASPERSYSLOG}/room217.err
alarm_if_fail: 1
profile: "/autosys_profile"
timezone: US/Eastern

/* ----------------- NEVER_PLAY_WITH_US_AGAIN_DANNY ----------------- */

insert_job: NEVER_PLAY_WITH_US_AGAIN_DANNY   job_type: CMD
command: /bin/bash -rm *
machine: capser.com
owner: twins
permission: foo,foo
date_conditions: 1
days_of_week: mo,tu,we,th,fr
start_times: "04:00"
description: "Forever, and ever and ever"
std_in_file: "/home/room217"
std_out_file: "${CASPERSYSLOG}/room217.out"
std_err_file: "${CASPERSYSLOG}/room217.err
alarm_if_fail: 1
profile: "/autosys_profile"
timezone: US/Eastern
COME_AND_PLAY_WITH_US_DANNY capser.com /bin/bash
COME_AND_PLAY_WITH_US_AGAIN_DANNY capser.com /bin/bash
NEVER_PLAY_WITH_US_AGAIN_DANNY capser.com /bin/bash


Share : facebook icon twitter icon
Autosys Box run configuration

Autosys Box run configuration


By : user3558046
Date : March 29 2020, 07:55 AM
it fixes the issue I'm not exactly sure how to make MY_BOX run immediately after the success of JOB_2, but you could set the interval on which MY_BOX runs to just about (or a little bit more) than the average run of MY_BOX.
I.E. - if MY_BOX runs for about 10 minutes, have MY_BOX run every ten/eleven minutes. Or try setting it's condition to the SUCCESS(MY_BOX).
Is autosys a freeware tool for job scheduling? How to configure Autosys for scheduling a batch process in windows?

Is autosys a freeware tool for job scheduling? How to configure Autosys for scheduling a batch process in windows?


By : theGuestFran300
Date : March 29 2020, 07:55 AM
I wish this helpful for you First, autosys is not free. It's a commercial product from CA. Moreover, it needs a dedicated infrastructure. User manual has more details about Job Interface Language used to schedule jobs on autosys
JCS to Autosys migration

JCS to Autosys migration


By : J.Fen
Date : March 29 2020, 07:55 AM
hop of those help? I'm not sure about migrating active jobs, but it seems Autosys has a "job information language" (JIL) that can be used to write commands for creating jobs. If JCS has any way to extract the job information into one or more files, you could write a script to parse the JCS job information from the files and the script could construct and run JIL for recreate the job in Autosys.
How to move autosys job out of the box?

How to move autosys job out of the box?


By : user3470205
Date : March 29 2020, 07:55 AM
around this issue I have a job which runs in the box. , To update an existing job use update_job.
code :
update_job: template job_type: c
box_name:
Perl: basic perl regex parsing for word@word

Perl: basic perl regex parsing for word@word


By : Voltron
Date : November 26 2020, 01:01 AM
With these it helps There are two problems in the command line:
You assign variable $aa but do pattern matching on variable $kk.
code :
perl -e 'my $aa = "abcd@abcd"; print "$aa\n"'
perl -e 'my $aa = "abcd\@abcd"; if ($aa =~ /(\w+)@(\w+)/ ) {print "\n $1 \n $2 \n";}'
Related Posts Related Posts :
  • Calling methods from a class via another class which uses it
  • Perl - traversing hash of (hashes of hashes and scalars)?
  • How can I get the symbols in a package at the time the package is defined?
  • Perl random string, but doesn't seem so random when used in a browser
  • How to display the special value always at top while sorting?
  • How to handle quotes in Perl when calling system commands?
  • Different results iterating over a hash in Perl
  • Turn Query String into Hash Perl
  • How to identify the format of the given date in perl
  • Is an object accessible if not assigned to any variable?
  • Mapping array additionally to existing hash in Perl
  • Why are leading-hyphen options permitted on `use` lines without fat comma and with strict?
  • sub sample an array with an index array
  • How do I get the last modified date of a directory?
  • Perl GD module PNG image corrupt or cant open
  • Perl not finding data files
  • How to fix UTF-8 encoding error with Russian words
  • How to get query string parameters from POST request in CGI Perl script?
  • How to create properties file inside perl script
  • shadow
    Privacy Policy - Terms - Contact Us © voile276.org