How do I convert a string to a number?

Use this atoi function:

        sub atoi {
         my $t;
         foreach my $d (split(//, shift())) {
           $t = $t * 10 + $d;
         }
         return $t;
       }

        $number = atoi("123");