Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Mysterious net::telnet error

by dmckee (Scribe)
on Mar 11, 2001 at 20:30 UTC ( #63621=note: print w/replies, xml ) Need Help??


in reply to Mysterious net::telnet error

sub _optimal_blksize { my ($blksize) = @_; return $blksize ## LINE 2569 if defined $blksize and $blksize > 0 and $blksize <= 1_048_576; 8192; } # end sub _optimal_blksize
Added at the request of arhuman
Why the hell have eight (now nine) people ++'d this?? I can understand upvoting the root Q, but not this!

Replies are listed 'Best First'.
(tye)Re: Mysterious net::telnet error
by tye (Sage) on Mar 12, 2001 at 03:11 UTC

    Someone is calling _optimal_blksize("").

    The fastest way I know to find this is to add -d to the Perl command line so the debugger runs then type "c" at the debugger prompt. This will cause you to get a stack backtrace when a warning happens, which is usually enough to track down the source of the bug.

    I wish the debugger had an option to break on warnings. It would be easy to hack that option in by having dbwarn() check if the warnLevel option is greater than 1 and, if so, force $single= 1 when it is finished. I'll try to find time to send in a patch for that. (:

    I suspect (and hope) that there is a module that provides stack backtraces for warnings via a simple -Mmodule=option command-line switch to Perl, but I'm not aware of one.

            - tye (but my friends call me "Tye")

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://63621]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (2)
As of 2020-06-05 00:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you really want to know if there is extraterrestrial life?



    Results (35 votes). Check out past polls.

    Notices?