Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: File::Spec patch (alternative)

by tye (Sage)
on Aug 09, 2008 at 05:56 UTC ( #703235=note: print w/replies, xml ) Need Help??

in reply to File::Spec patch

Next time you have this kind of problem, consider this technique instead:

require Carp; $SIG{__WARN__} = sub { Carp::cluck(@_) };

It will save you a lot of time trying to patch your copy of a module.

You can also just start your script with "perl -d" then "c" since "o warn=1" is the default which means that you'll get a stack dump tacked on to each warning you get. You can probably even get the debugger to stop at the point of the warning so that you can look around and figure out the source of the problem:

perl -d ... > $SIG{__WARN__} = sub { $DB::single = 1; } > c

- tye        

Replies are listed 'Best First'.
Re^2: File::Spec patch (alternative)
by pileofrogs (Priest) on Aug 15, 2008 at 21:07 UTC


    I'm going to print this out in huge letters and tape it to my wall. I'm going to hire a shadowy firm in Russia to email this advice to 3 million random strangers. I'm going to hack the web page of the 2008 Olympics and put this up in it's place.

    Indeed, it could be said that I find it helpful.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2016-10-24 09:26 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (304 votes). Check out past polls.