in reply to
How to umount and eject cdrom on MacOSX from Perl?
This
might be of some help
Comment on
Re: How to umount and eject cdrom on MacOSX from Perl?
In Section
Seekers of Perl Wisdom