Help for this page

Select Code to Download


  1. or download this
        my $self = shift;
    my ($amount) = @_;
...
        $amountNew = $amountOld + $amount;
        print("\nNew values\n"), Dump($amountOld), Dump($amount), Dump
+($amountNew), print("Correct output: ($amountOld + $amount = $amountN
+ew)\n\n");
    }
  2. or download this
    SV = PVNV(0x2c8ef8c) at 0x23b4958
  REFCNT = 1
...
  CUR = 16
  LEN = 35
Correct output: (4253.95 + 0.9 = 4254.85)
  3. or download this
    perl -v

This is perl, v5.8.3 built for MSWin32-x86-multi-thread
(with 8 registered patches, see perl -V for more detail)