The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
Parse-Tektronix-ISF-0.0103
River stage zero No dependents
++
/ Parse::Tektronix::ISF

NAME

Parse::Tektronix::ISF - Parse the ISF file generated by certain models of Tektronix oscillascope (TDS 3000, DPO 4000, etc)

VERSION

Version 0.0102

SYNOPSIS

    use Parse::Tektronix::ISF;

    my $foo = Parse::Tektronix::ISF::Read('filename.isf');
    print $foo->{NR_PT}; # get number of data points
    print $foo->{DATA}[100][1]; # get y coordinate of the 101st data point

EXPORT

None by default.

All functions can be exported by

    use Parse::Tektronix::ISF ':all';

FUNCTIONS

Read

Takes one parameter as the name of the .isf file.

Read data from file into a hash reference which contains all the information in the header. For example, to get the number of data points in a file:

    my $foo = Parse::Tektronix::ISF::Read('filename.isf');
    print 'The file contains ', $foo->{NR_PT}, " points\n";
    print 'x, y units : ', $foo->{XUNIT}, ',', $foo->{YUNIT}, "\n";
    print 'info : ', $foo->{WFID}, "\n";

In addition, the raw data are stored in the key 'DATA' as an array reference, each element is a data point which is stored as an array reference of (x, y) values. For example, to get the x, y value of the 1000th point:

    my $foo = Parse::Tektronix::ISF::Read('filename.isf');
    my ($x, $y) = @{$foo->{DATA}[999]};

ConvertToCSV

Takes two parameters, they are the input/output file names.

Converts a .isf file to a .csv file.

SEE ALSO

This module was inspired by the MATLAB program from John Lipp : http://www.mathworks.com/matlabcentral/fileexchange/6247

Tektronics provided isf to csv conversion program (.exe) at http://www2.tek.com/cmswpt/swdetails.lotr?ct=SW&cs=sut&ci=5355&lc=EN

AUTHOR

Ruizhe Yang, <razor at cpan.org>

BUGS

Please report any bugs or feature requests to bug-parse-tektronix-isf at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Parse-Tektronix-ISF. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc Parse::Tektronix::ISF

You can also look for information at:

COPYRIGHT & LICENSE

Copyright 2009 Ruizhe Yang, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.