Perl Port of metainspector