Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re: How can I suppress 'uninitialized' warnings in a CPAN module?

by toolic (Bishop)
on Nov 17, 2013 at 16:59 UTC ( #1063003=note: print w/ replies, xml ) Need Help??

in reply to How can I suppress 'uninitialized' warnings in a CPAN module?

Some of RTF::Tokenizer version 1.13:

# Reads a line from an IO:File'ish object sub _get_line { my $self = shift(); # Turn off warnings for the rest of this sub (at some point I'll u +pgrade # to 'no warnings "uninitialized"', but don't want to force a Perl + version # on people yet) local ($^W); # Localize the input record separator before changing it so # we don't mess up any other part of the application running # us that relies on it local $/ = $self->{_IRS}; # Read the line itself $self->{_BUFFER} .= $self->{_FILEHANDLE}->getline(); # <-------- +Line 208 }

It looks like there is an attempt to disable warnings in the sub. Does it not work?

Also, this bug report looks relevant: Eliminate warnings when EOF is reached.

Comment on Re: How can I suppress 'uninitialized' warnings in a CPAN module?
Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (5)
As of 2015-10-07 03:39 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (170 votes), past polls