> > 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