Select Code to Download

  DB<159> $a=inf
 => "inf"
...

  DB<162> ++$a  
 => "inf"

  DB<156> $a=inf
 => "inf"
...

  DB<158> ++$a  
 => "inh"

  DB<174> $a=inf+0
 => "inf"
...

  DB<176> ++$a  
 => "inf"

 perl -e '$a=inf; print ++$a,"\n"'
ing