Finnigan::InstID -- a decoder for InstID, a set of instrument identifiers
use Finnigan; my $inst = Finnigan::InstID->decode(\*INPUT); say $inst->model; say $inst->serial_number; say $inst->software_version; $inst->dump;
InstID is a static (fixed-size) structure containing several instrument identifiers and some unknown data.
The identifiers include the model name, the serial number and the software version.
The constructor method
Get the first copy of the model attribute (there always seem to be two of them)
Get the instrument's serial number
Get the version of software that created the data file
Concatenate all IDs in a single line of text
Gene Selkov, <firstname.lastname@example.org>
Copyright (C) 2010 by Gene Selkov
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.0 or, at your option, any later version of Perl 5 you may have available.