- or download this
>perl -e "use Devel::Peek; $x="Infinity"; Dump($x); $x=Infinity; Dump(
+$x)"
SV = PV(0x22612c) at 0x226000
...
PV = 0x1835404 "-Infinity"\0
CUR = 9
LEN = 12
- or download this
>perl -le "print 0+(-Infinity)"
0
>perl -le "print 0+('Infinity')"
0
- or download this
>perl -v
...
Built Mar 20 2006 17:54:25
...