version 1.58, 2005/10/13 10:27:28
|
version 1.60, 2005/12/08 02:22:15
|
Line 697 sub get_values {
|
Line 697 sub get_values {
|
} |
} |
return \@values; |
return \@values; |
} else { |
} else { |
$num = '(\d+)'; |
$num = '([1-9]\d*)'; |
} |
} |
if (($la eq '*') || ($ua eq '*')) { |
if (($la eq '*') || ($ua eq '*')) { |
$alpha='[A-z]'; |
$alpha='[A-z]'; |
Line 1665 sub load {
|
Line 1665 sub load {
|
|
|
sub cache_sheet { |
sub cache_sheet { |
my $self = shift; |
my $self = shift; |
my $formulas=(@_); |
my ($formulas) = @_; |
my $stype = $self->{'type'}; |
my $stype = $self->{'type'}; |
my $cnum = $self->{'cnum'}; |
my $cnum = $self->{'cnum'}; |
my $cdom = $self->{'cdom'}; |
my $cdom = $self->{'cdom'}; |