Further Information
Example of Scheduled Eject of Media
Appendix AA-16
$report =`"${OMNIBIN}omnimm" -eject \"$lib\"
$slots`;
#print "\debug>\n$report\n<debug\n";
if ($report !~/Final report: (\d+) cartridges out of
(\d+) successfully ejected\./) {
print "[Critical] Eject has
failed!\n\nReport:\n$report\n";
return (1);
}
print "$report\n";
if ($1 ne $2) {
print "[Warning] Not all media successfully
ejected!\n";
return (2);
}
print "[Normal] Eject from library \"$lib\"
successfully completed.\n";
return (0);
}
#=======================================================
========================
# FUNCTION Eject
#
# ARGUMENTS none
#
# DESCRIPTION Function for each library in %List call
Library_Eject
#=======================================================
========================
sub Eject {
local ($lib,$slot,$result);