Re: ADSM Perl Scripts
1998-10-01 00:27:22
> > I have written some Perl routines that use the -commadelimited option.
>
> > Now if I can just convience the ADSM NOT to put commas into numbers ;)
> Try -tabdelimited instead.
It still formats numbers as "60,437.5". This is trivial but annoying
to fix in Perl. You can then multiply, sum etc that by another
number.
ADSM is smart enough to put quote marks around any field that would
have commas when it is comma delimited, and I found the right Perl
regexp to split the line correctly.
As for useful Perl scripts: I have so far..
for our operations staff one that says which COPY POOL volumes have
filled over night, which need to be returned and how much spare
capacity the tape pools have.
a "is ADSM feeling healthy" (db mirrors on line, volumes in error
state, ...)
and one that produces daily emails to the end users saying what
happened last night and a summary to me as ADSM admin.
periodically reads the activity log and emails me any new and
"interesting" messages
I could share these if there are any takers.
Russell
|
<Prev in Thread] |
Current Thread |
[Next in Thread>
|
- Re: ADSM Perl Scripts, Pat Wilson
- Re: ADSM Perl Scripts, Carl Makin
- Re: ADSM Perl Scripts,
Russell Street <=
- Re: ADSM Perl Scripts, Daniel Whicker
- ADSM Perl Scripts, Ronnie Ignacio
- Re: ADSM Perl Scripts, Andrew Raibeck
- Re: ADSM Perl Scripts, Mark Devine
- Re: ADSM Perl Scripts, Dan Giles
- Re: ADSM Perl Scripts, Russell Street
- ADSM Perl Scripts, Russell Street
- Re: ADSM Perl Scripts, Isabel Rode
- Re: ADSM Perl Scripts, David Daun
|
|
|