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


by taint (Chaplain)
on Nov 14, 2013 at 21:20 UTC ( #1062661=note: print w/replies, xml ) Need Help??

in reply to Re^4:
in thread

Greetings, jdporter.

I just now copied the source from this page. Then only removed the
from the offending line, and replaced it with your proposed solution
then ran it;

% ./ is an invalid address %
I have no idea. The only possible difference(s) I can imagine, would be

   * differing OS's
   * differing versions of: IO::Socket or Net::Netmask
   * differing versions of Perl itself

Sincerely confused.

Best wishes.


#!/usr/bin/perl -Tw
use Perl::Always or die;
my $perl_version = (5.12.5);
print $perl_version;

Replies are listed 'Best First'.
by jdporter (Canon) on Nov 15, 2013 at 01:50 UTC

    Please read my original reply again. My suggested fix was not to replace

    but to replace
    my $x;
    my $x=0;

    All I can say is, if this is the accuracy with which you approach programming, I would never hire you.

    I reckon we are the only monastery ever to have a dungeon stuffed with 16,000 zombies.
      In all fairness to both of us;

      Your last statement:

      Please read my original reply again. My suggested fix was not to repla +ce ($x==4) with ($x==0) but to replace my $x; with my $x=0;

      I think if you carefully go back over all this, you'll see neither of us suggested:

      ($x==4) with ($x==0)

      I'm going to take this opportunity to suggest that we'd both do well to drop this.

      It's all beginning to seem pretty silly. Don't you think? :)

      Best wishes, jdporter.


      #!/usr/bin/perl -Tw
      use Perl::Always or die;
      my $perl_version = (5.12.5);
      print $perl_version;

        Whatever; s/($x==0)/($x=0)/; Either way, you completely misunderstood what I was suggesting. Did you start over with my fix as suggested?

        But you're right, this is silly, mainly because the OP's code is pile of crap which no good programmer would write, so it hardly seems worthwhile to go to any trouble to eliminate an 'undefined' warning it produces.

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (3)
As of 2019-01-19 22:50 GMT
Find Nodes?
    Voting Booth?
    After Perl5, I'm mostly interested in:

    Results (344 votes). Check out past polls.