Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
print Dumper $xl->{Calculation};
$xl->{Calculation}=-4135;
print Dumper $xl->{Calculation};
  2. or download this
    X:\Data\Perl>1145425.pl
$VAR1 = bless( do{\(my $o = 40621128)}, 'Win32::OLE::Variant' );
$VAR1 = bless( do{\(my $o = 40621128)}, 'Win32::OLE::Variant' );
  3. or download this
    X:\Data\Perl>1145425.pl
$VAR1 = -4105;
$VAR1 = -4135;