Error handling's not too hard - you need to eval the statement and then check if it was OK. Eg:

eval '$_=PDF::Core::PDFGetline ($fd,\$offset);';

if ($@) {
  # deal with error
}

# ok, so carry on
[download]

cLive ;-)