Why are you blaming strict? Delete use strict and the problem still appears.

The problem is perl's parser/interpretter which doesn't properly record the line number of the various bits of an if. Consider: 

#! /usr/bin/perl

my $a = "foo";
if ( $a =~ m/aa/ ) {
  print "hello";
 } elsif ( nonexistant() ) {
  print "hello";
 } else { }

[download]

Which says 

Undefined subroutine &main::nonexistant called at - line 4.

[download]

Basically everything in the conditions of an if statement appears to be on the same line as the if.

It sucks but it's a known issue and not likely to be fixed any time soon. If I recall correctly, the way perl currently works, to fix this would mean that each block in the if would require it's own stack frame, which is too much overhead.

In reply to Re: Confusing warning with if/elsif/else by fergal
in thread Confusing warning with if/elsif/else by gumpu

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.