I find it useful, Dale!  Thank you!

Trivia ...

* I concur that "-ev" cannot be on the bpmedialist command (and is not 
needed) for v5.1.

* I would have preferred the "-size" option to report size of data in 
GB, changing the heading and reporting just numbers rather than G or M, 
etc. ... but that's just me.  I also like right-aligned numbers, but 
again, that's just me (and available_media did set a precedent).

* I like to see new and replacement commands to any system have their 
own unique names, where possible. I call this gem 
"available_media_by_DaleKing.perl". Obviously an "exit" must be named 
appropriately, but other programs should have their own names.  There 
are a number of reasons for this.  First, if you or a colleague ever 
goes to the vendor talking about program "x", you both know exactly the 
program you're talking about: the vendor's!  If the vendor changes the 
program, yours remains intact (and can be changed if/when you want).  If 
you're forgetful like me, or are replaced or have a helper someday, it's 
much more obvious where you have local code.

* For those that use "non root admin", you might want to consider 
changing the group on this command, vmpool, vmquery and bpmedialist so 
the non root admins can run it.

Thanks again, Dale!     cheers, wayne


dale AT daleking DOT org wrote, in part,  on 11/7/2004 11:34 PM:

>Hi All,
>
>The available_media script in /usr/openv/netbackup/bin/goodies is a dog
>
>for sites with a large number of tapes.
>I've rewritten this script in perl for performance and was wondering if
>anyone who uses the veritas version would like to test it.
>
>On our system ~1400 carts the veritas version takes ~55 minutes.  This
>version takes ~12 seconds and emulates the output, including the -summary
>option.
>
>Things to note:
>       - added -size option to display data sizes in Ki/Mi/Gi
>       - added -pool= to only show a specific pool name
>       - added WARNING lines if multiple mediaids are found in the MM
>         (remove or filter these lines if you depend on the output
>         format)
>       - my perl is weak - please submit improvements after which I'll
>         make it generally available somewhere else
>       - only tested with nbu 4.5 under AIX
>       - don't forget to update the script with the location of perl
>         on your system 
>
>I hope someone finds this useful.
>
>- Dale
>  
>