<div dir="ltr"><div>Hello all,</div><div><br></div><div>please consider the following code:</div><div>###################################</div><div>package main;</div><div>my $x= main::foo-&gt;new();</div><div>$x-&gt;bar();</div>
<div>$x-&gt;barx();</div><div><br></div><div>package foo;</div><div><br></div><div>sub new {</div><div><span class="Apple-tab-span" style="white-space:pre">        </span>my $this = shift;</div><div><span class="Apple-tab-span" style="white-space:pre">        </span>my $class = ref($this) || $this;</div>
<div><span class="Apple-tab-span" style="white-space:pre">        </span>my $self={};</div><div><span class="Apple-tab-span" style="white-space:pre">        </span>bless ($self, $class);</div><div><span class="Apple-tab-span" style="white-space:pre">        </span>return $self;</div>
<div>}</div><div><br></div><div>sub bar</div><div>{</div><div><span class="Apple-tab-span" style="white-space:pre">        </span>my $self = shift;</div><div><span class="Apple-tab-span" style="white-space:pre">        </span>print &quot;foo\n&quot;;</div>
<div>}</div><div>#################################</div><div><br></div><div>now, executing this code with &quot;perl -cw <a href="http://script.pl">script.pl</a>&quot; will not produce any errors since the call for the reference of &quot;barx&quot; will only</div>
<div>be evaluated during runtime. </div><div>is there a way to detect such errors in compile time?</div><div><br></div><div>Hag Sameach,</div><div>Ronen</div></div>