Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

...
num_test('123aa');
num_test('aa123');
num_test('1.23');
  2. or download this
    Argument "aa" isn't numeric in subroutine entry at ./809635.pl line 15
+.
SV = PVNV(0x669cf0) at 0x65ed30
...
  PV = 0x665710 "1.23"\0
  CUR = 4
  LEN = 8
  3. or download this
    Argument "aa" isn't numeric in subroutine entry at ./809635.pl line 15
+.
SV = PVNV(0x669cf0) at 0x65ed30
...
  PV = 0x665710 "1.23"\0
  CUR = 4
  LEN = 8