On 21/01/2011 05:50, Erez Schatz wrote:
On 20 January 2011 15:38, Eyal B.<ewinst...@gmail.com>  wrote:

I'm getting an error on the line where I should use the TTL variable -
and take the right value from the hash (%list) :Use of uninitialized
value in print at D:\system\perl\os-rec\os-rec5_.pl line 24
,<HANDLE>  line 3.

Any idea ?
                        if("$line" =~ "TTL=")
                                        {
                                $line =~ s/.*TTL=//;
                                print "TTL = $line\n";
                                print $list{"$line"} ;
                                # print "Machine $machine_IP is $list{$line}" ;
                                last;                                   }

Assuming a specific line is made of nothing but TTL=, then $line =~
s/.*TTL=//; will erase the line, leaving you with an empty
(uninitialized) $line variable.

No it won't, it will leave $line containing a null (zero-length) string.
There is no way to change a string value to uninitialized (undef) by
deleting characters from it.

- Rob

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to