projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add perl functions to get the format of a variable
[pspp-builds.git]
/
perl-module
/
lib
/
PSPP.pm
diff --git
a/perl-module/lib/PSPP.pm
b/perl-module/lib/PSPP.pm
index 2ca942c208d4771c0616016b76c435018692b82d..e5599908b683f7b6e6bde716fbfa9f74d3460338 100644
(file)
--- a/
perl-module/lib/PSPP.pm
+++ b/
perl-module/lib/PSPP.pm
@@
-21,7
+21,7
@@
None by default.
=cut
BEGIN {
=cut
BEGIN {
-
do 'pspp-vers.pl' || die "No version set"
;
+
$PSPP::VERSION='0.7.2'
;
require XSLoader;
XSLoader::load('PSPP', $PSPP::VERSION);
}
require XSLoader;
XSLoader::load('PSPP', $PSPP::VERSION);
}
@@
-87,9
+87,15
@@
sub new
=pod
=pod
+=head3 get_var_cnt ()
+
+Returns the number of variables in the dictionary.
+
=head3 get_var ($idx)
Returns the C<idx>th variable from the dictionary.
=head3 get_var ($idx)
Returns the C<idx>th variable from the dictionary.
+Returns undef if C<idx> is greater than or equal to the number
+of variables in the dictionary.
=cut
=cut
@@
-243,7
+249,7
@@
An integer denoting the number of decimal places for the format.
=item width
=item width
-An integer denoting the
number of
width of the format.
+An integer denoting the width of the format.
=back
=back
@@
-276,6
+282,16
@@
sub set_print_format
=pod
=pod
+
+=head3 get_write_format ()
+
+Returns a reference to a hash containing the write format for the variable.
+
+
+=head3 get_print_format ()
+
+Returns a reference to a hash containing the print format for the variable.
+
=head3 set_output_format (%fmt)
Sets the write and print formats to C<fmt>. This is the same as
=head3 set_output_format (%fmt)
Sets the write and print formats to C<fmt>. This is the same as
@@
-463,7
+479,7
@@
Opens a system file for reading.
Open is used to read data from an existing system file.
It creates and returns a PSPP::Reader object which can be used to read
Open is used to read data from an existing system file.
It creates and returns a PSPP::Reader object which can be used to read
-data and dictionary information from
<C>filename
.
+data and dictionary information from
C<filename>
.
=cut
=cut
@@
-489,9
+505,10
@@
Returns the dictionary associated with the reader.
Retrieves the next case from the reader.
This method returns an array of scalars, each of which are the values of
the data in the system file.
Retrieves the next case from the reader.
This method returns an array of scalars, each of which are the values of
the data in the system file.
-The first call to
<C>get_next_case after <C>open
has been called retrieves
+The first call to
C<get_next_case> after C<open>
has been called retrieves
the first case in the system file. Each subsequent call retrieves the next
the first case in the system file. Each subsequent call retrieves the next
-case. If there are no more cases to be read, the function returns undef.
+case. If there are no more cases to be read, the function returns an empty
+list.
If the case contains system missing values, these values are set to the
empty string.
If the case contains system missing values, these values are set to the
empty string.
@@
-503,7
+520,7
@@
values retrieved from a reader.
=head3 PSPP::format_value ($value, $variable)
=head3 PSPP::format_value ($value, $variable)
-Returns a scalar containing a string representing C<value> formatted accoring
+Returns a scalar containing a string representing C<value> formatted accor
d
ing
to the print format of C<variable>.
In the most common ussage, C<value> should be a value of C<variable>.
to the print format of C<variable>.
In the most common ussage, C<value> should be a value of C<variable>.