note
mpeters
No, this won't actually work. From perldoc:
<blockquote>
<em>
But if you try this:
<code>
$class = ’Foo::Bar’;
require $class; # $class is not a bareword
#or
require "Foo::Bar"; # not a bareword because of the ""
</code>
The require function will look for the "Foo::Bar" file in the @INC array and will complain about not finding "Foo::Bar" there. In this case you can do:
<code>
eval "require $class";
</code>
</em>
</blockquote>
But you could do:
<code>
my $module = 'Crunch/' . $company .'.pm';
require $module;
</code>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-377463">
<br>-- <i>More people are killed every year by pigs than by sharks, which shows you how good we are at evaluating risk.</i> -- Bruce Schneier
</div></div>
490001
490002