Help for this page

Select Code to Download

Select or download this

use strict ;
use warnings ;
...
  $@ .= sprintf(" (\@0x%X of file '%s')", $f_offset, $name) ;
  return undef ;
} ;