[ale] String -> Number

[John Wells]

So what does SPORT look like when you set $VERBOSE?

Christopher Fowler said:
> Is there a formal method of converting a string to a number?  I'm
> reading a line from a socket that is really a number.  I'm passing that
> var as an argument to IO::Socket::INET but it fails connection.  By
>
> This works
>
>
> #strip line terminateor off
>     chomp($line);
>     $SPORT = $line;
>
>     close($sock);
>
>     if($VERBOSE == 1) {
>         print (STDOUT "Connecting to secondary server on port ", $SPORT,
> "\n");
>     }
>
>     my $sock = new IO::Socket::INET (
>                                      PeerAddr => $SERVER,
>                                      PeerPort => 783,
>                                      Proto => 'tcp',
>                                      );
>     die "Could not create socket: $!\n" unless $sock;
>
> This does not
>     my $sock = new IO::Socket::INET (
>                                      PeerAddr => $SERVER,
>                                      PeerPort => $SPORT,
>                                      Proto => 'tcp',
>                                      );
>     die "Could not create socket: $!\n" unless $sock;
>
> I'm trying to write a portable logging program that will log output
> received to a file.
>
> Thanks,
> Chris
>
>
>
> _______________________________________________
> Ale mailing list
> Ale at ale.org
> http://www.ale.org/mailman/listinfo/ale



_______________________________________________
Ale mailing list
Ale at ale.org
http://www.ale.org/mailman/listinfo/ale