Help for this page

Select Code to Download


  1. or download this
    sv_setiv (*svp, SvIV (*svp));
  2. or download this
    $ perl -wE'my $int = 1 + ""'
Argument "" isn't numeric in addition (+) at -e line 1.
  3. or download this
    $ perl -wE'no warnings "numeric";my $int = 1 + ""'
$
  4. or download this
    while (my $colref = eval { no warnings "numeric"; $csv->getline_hr ($f
+h)}) {
  5. or download this
        say "$_ $names->[$_]\t$colref->{$names->[$_]}" for
    grep { $types->[$_] == Text::CSV_XS::IV } 0 .. $#$types;
...
23 skip014      518
24 skip015      3603
29 skip017      0