Accessing the execution plan via the DBI interface

Is there a way to access the execution plan of a query using the DBI
interface?
Since EXPLAIN seems to write to STDERR, there is no way to use
prepare->execute->fetch ...
Does anybody know, what to do best - I don't want to use a system call
from inside Perl.

    Hans